-- Copyright (C) 1985, 1986  by Xerox Corporation. All rights reserved. 
-- CHeap.mesa
-- NFS   18-Dec-85 14:35:12
-- C Library storage allocation/deallocation procedures

DIRECTORY
  PrincOpsExtrasBP USING [BytePointer];
CHeap: DEFINITIONS =
  BEGIN

  BytePointer: TYPE = PrincOpsExtrasBP.BytePointer;

  malloc: PROCEDURE [size: CARDINAL] RETURNS [BytePointer];

  calloc: PROCEDURE [nelem, elsize: CARDINAL] RETURNS [BytePointer];

  realloc: PROCEDURE [ptr: BytePointer, size: CARDINAL] RETURNS [BytePointer];

  free: PROCEDURE [ptr: BytePointer] RETURNS [INTEGER];

  GetHeap: PROCEDURE RETURNS [UNCOUNTED ZONE];

  SetHeap: PROCEDURE [z: UNCOUNTED ZONE] RETURNS [INTEGER];

  END.