perm filename SPACE.HDR[NEW,AIL] blob sn#408320 filedate 1979-01-08 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	EXTERNAL INTEGER PROCEDURE GETSPACE(INTEGER SIZ)
C00003 ENDMK
CāŠ—;
EXTERNAL INTEGER PROCEDURE GETSPACE(INTEGER SIZ);
EXTERNAL PROCEDURE FREESPACE(INTEGER ADR);

EXTERNAL INTEGER SIMPLE PROCEDURE GETSMALL(INTEGER SIZE);
EXTERNAL INTEGER SIMPLE PROCEDURE LOPSMALL(INTEGER OWNR);
EXTERNAL SIMPLE PROCEDURE FREESMALL(INTEGER ADR,SIZ);
EXTERNAL SIMPLE PROCEDURE LINKSMALL(INTEGER ADR,OWNR);
EXTERNAL SIMPLE INTEGER PROCEDURE ADDSIZE(INTEGER SIZE,INCRCNT(50),OWNR(0));

EXTERNAL INTEGER BOWNRS;

REQUIRE "SPACE.REL[S,RHT]" LOAD_MODULE;