Recent clf ICE report
Steve Kargl
sgk@troutmask.apl.washington.edu
Wed Dec 15 21:32:00 GMT 2010
On Wed, Dec 15, 2010 at 01:16:22PM -0800, Steve Kargl wrote:
> On Wed, Dec 15, 2010 at 12:10:45PM -0800, Steve Kargl wrote:
> > James van Buskirk has posted a short program in clf.
> > Anyone recognize this as valid Fortran?
> >
> > program bug1
> > use ISO_C_BINDING
> > implicit none
> > character(kind=C_CHAR), pointer :: cDefault(:)
> > call C_F_POINTER(transfer(32512_C_INTPTR_T, C_NULL_PTR), cDefault, [1])
> > end program bug1
> >
>
> OK. I see what James is trying to do. Not sure it's valid.
> Simplified testcase
>
> program bug1
> use ISO_C_BINDING
> implicit none
> print *, transfer(32512, C_NULL_PTR)
> end program bug1
>
Actually, any entity with a derived type of C_PTR leads
to an ICE.
program bug1
use ISO_C_BINDING
implicit none
type(c_ptr) :: m
print *, transfer(32512, m)
end program bug1
--
Steve
More information about the Fortran
mailing list