-- TempFileDefs.mesa
-- created by Schroeder, November 18, 1980  11:13 AM
-- edited by Brotz, November 19, 1981  11:44 AM

DIRECTORY
  VMDefs USING [FileHandle];

tfD: DEFINITIONS =

BEGIN


AllocateTempFile: PROCEDURE RETURNS [VMDefs.FileHandle];
-- Maintains a free list of previously opened temp files.  Will allocate one of these if
--   available.  If not available then will generate another temp file.


FreeTempFile: PROCEDURE [h: VMDefs.FileHandle];
-- Use to return a temp file when it is no longer needed.
-- Returned files can be reused by others.
-- Truncates h to 3 pages if currently longer and closes it.


END.  -- of TempFileDefs --
(635)\f1