[Gm2] frame and return address of functions

[Gaius Mulley]

Hi,

these can now be obtained by the new builtin functions (frame_address
and return_address).  So for example the following code sets the
return address in 'a'.  The parameter indicates how many levels you
wish to go back up the call stack.


MODULE return ;

FROM SYSTEM IMPORT ADDRESS ;
FROM Builtins IMPORT return_address ;

PROCEDURE foo ;
VAR
   a: ADDRESS ;
BEGIN
   a := return_address (0)
END foo ;

BEGIN
   foo
END return.


regards,
Gaius