DEFINITION MODULE Procs;

FROM PsStk IMPORT NotOnPsStk;

EXPORT QUALIFIED procs, ParmSpace, InitSize, LinkSpace, GBParmSpace;

CONST LinkSpace = 2;   (* size in words of sub call on stack *)
VAR ParmSpace, InitSize : INTEGER;
VAR GBParmSpace: ARRAY [1..NotOnPsStk] OF INTEGER;
PROCEDURE procs (instruction : CARDINAL);
END Procs.
