Re: Syntax check for IMPLICIT statement



On Mon, 28 Apr 2008 00:32:40 -0600, "James Van Buskirk" <not_valid@xxxxxxxxxxx> wrote:

-|"James Van Buskirk" <not_valid@xxxxxxxxxxx> wrote in message
-|news:oa-dnXRJnLb6wYjVnZ2dnUVZ_tCrnZ2d@xxxxxxxxxxxxxx
-|
-|> I still haven't gotten to that one, but here is one that was hard
-|> to isolate:
-|
-|Still haven't made it to the mythic ICE but I have another stumbling
-|block:
-|
-|C:\gfortran\clf\startest>type bug3.f90
-|program bug3
-| use ISO_C_BINDING, only: C_INTPTR_T, C_NULL_PTR, C_NULL_FUNPTR
-| use ISO_C_BINDING, only: C_PTR, C_LOC
-| implicit none
-| type(C_PTR) p1
-| integer, target :: i1
-|
-| p1 = C_LOC(i1)
-| write(*,'(a,z16.16)') 'p1 = ', transfer(p1,0_C_INTPTR_T)
-|end program bug3

This one works correctly using g95.
Skip


.