association of pointers
- From: harper@xxxxxxxxxxxxx (John Harper)
- Date: 14 Nov 2007 12:09:02 +1300
In an attempt to understand pointers, I wrote the following:
PROGRAM testassoc3
INTEGER, TARGET :: beast = 666
INTEGER, POINTER :: ptr => NULL()
ALLOCATE(ptr)
ptr = beast
PRINT "(A,I4)",' After ptr = beast, ptr is',ptr
PRINT "(A,L2)",' associated(ptr,beast) is',associated(ptr,beast)
PRINT "(A,L2)",' associated(ptr) is',associated(ptr)
END PROGRAM testassoc3
The output from four different f95 compilers was
After ptr = beast, ptr is 666
associated(ptr,beast) is F
associated(ptr) is T
That appears to suggest that ptr was associated with something at the
time of printing, but not with beast even though its value was that
of beast. What was ptr associated with?
-- John Harper, School of Mathematics, Statistics and Computer Science,
Victoria University, PO Box 600, Wellington 6140, New Zealand
e-mail john.harper@xxxxxxxxx phone (+64)(4)463 5341 fax (+64)(4)463 5045
.
- Follow-Ups:
- Re: association of pointers
- From: mecej4
- Re: association of pointers
- From: Richard Maine
- Re: association of pointers
- From: glen herrmannsfeldt
- Re: association of pointers
- Prev by Date: Re: Win32 API and gfortran
- Next by Date: Re: Win32 API and gfortran
- Previous by thread: Creating Dll CVF 6.6
- Next by thread: Re: association of pointers
- Index(es):
Relevant Pages
|
