MarzAttax
Joined: 15 Jun 2006 Posts: 46
|
Posted: Thu Jul 20, 2006 5:03 am Post subject: Pointers (1) |
|
|
First things first.
As people have a habit of helpfully pointing out that code I post one here doesnt work and that they are surprised that it ever has done,
" THE CODE IS NOT MEANT TO WORK, IT IS ILLUSTRATIVE ONLY"
Ok, now that is out of the way............
Please look over the following "code":
========================================
Module A
Type stFerret
Integer*4, Pointer :: iTeeth(
End Type
Type(stFerret) pstFerret
Call NewInt4Array(pstFerret%iTeeth)
End Module
========================================
Module New
Subroutine NewInt4Array(Integer4Array)
Integer*4, Pointer :: Integer4Array(
NULLIFY(Integer4Array)
End Module New
========================================
My question is (as I am obviously not clever enough to understand technical ForTran documentation) )
Does the pointer passed to the routine get NULLIFIED?
or
As I intend, does pstFerret%iTeeth get NULLIFIED?
Appreciate any help on this thanx.
Bri |
|