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