-- file: MFMemory.mesa
-- Pascal-to-Mesa translator output, translated at October 31, 1985 4:28:00 pm PST


DIRECTORY
  PascalBasic,
  PascalWizardFiles,
  MFTypes;

MFMemory: DEFINITIONS IMPORTS  =
BEGIN OPEN PascalBasic, PascalWizardFiles, MFTypes;

TempPtr: Halfword;

LoMemMax: Halfword;

HiMemMin: Halfword;

VarUsed: PascalInteger;

DynUsed: PascalInteger;

Avail: Halfword;

MemEnd: Halfword;

Rover: Halfword;

--:664----:162----163:-- GetAvail: PROCEDURE RETURNS[GetAvailResult: Halfword];

 GetNode: PROCEDURE[S: PascalInteger] RETURNS[GetNodeResult: Halfword]
;

 FreeNode: PROCEDURE[P: Halfword,S: Halfword];

 SortAvail: PROCEDURE;

--:173----177:-- FlushList: PROCEDURE[P: Halfword];

 FlushNodeList: PROCEDURE[P: Halfword];

END.