🚀 go-pugleaf

UK4H@DKAUNI2.BITNET (JAE) writes:

>Bob Campbell wrote:
>> NEW is ALLOCATE(x,SIZE(x))
>> DISPOSE is DEALLOCATE(x,SIZE(x))
>THIS IS WRONG!!!!
>Instead you have to write
>  ALLOCATE(x,SIZE(x^));
>  DEALLOCATE(x,SIZE(x^));
>'^' is the caret (dereferencing 'operator').

The way I do it is thus: 

If you have a type declaration 

	TYPE
		Dave = POINTER TO Fred ;
		Fred = RECORD
			Field1 : ARRAY[0..30] OF INTEGER ;
			Field2 : ARRAY[0..9] OF CHAR ;
			Pointer : Dave ;
		       CEND ;

then	VAR
		Variable : Dave ;

	you can then do

	ALLOCATE (Variable,TSIZE(Fred))

	where ALLOCATE is IMPORTed from STORAGE and TSIZE from SYSTEM (or the
	other way round, I think this is the right way though).

One thing you have to make sure of is that you put TSIZE(Fred) and not, by a
slip of the keyboard, TSIZE(Dave), else you'll be trying to place something of
RECORD type in a space the size of a POINTER. Doesn't work, and it's a sod to
find out why (I know !!!!).

Just a thought .....

	Dave Cartwright,
	    School of Information Systems,
		University of East Anglia,
		    Norwich,
			England.

Note : I am only a student => I am pretty thick really => Don't shout at me too
							  much if I'm wrong.