DIRECTORY FS USING [OpenFile], IO USING [STREAM], NSString USING [String]; QueueFile: CEDAR DEFINITIONS = BEGIN InsufficientPages: ERROR; CreateError: ERROR; TraceLevel: TYPE = {none, mini, verbose}; CreateTempFile: PROCEDURE [fName: NSString.String, fBytes: LONG CARDINAL] RETURNS [fileID: FS.OpenFile, fileH: IO.STREAM]; Delete: PROCEDURE [fileID: FS.OpenFile, file: IO.STREAM _ NIL] RETURNS [FS.OpenFile]; MakePermanent: PROCEDURE [file: FS.OpenFile, attrs: NSString.String ]; SetTrace: PROCEDURE [trace: TraceLevel]; END. LOG September 23, 1981 7:30 PM by J.Beeley Action: Created file. 11-Nov-81 10:54:26 by Muntz Action: Converted to SFS. 22-Apr-82 17:44:30 by Muntz Action: Changed Create to CreateTempFile. Added MakePermanent. 16-Sep-82 14:34:05 - Beeley - Changed local def of TraceLevel to CommandInterface.TraceLevel. 27-Sep-82 8:03:55 - Alfvin - Converted to Pilot 9.0, Filing 5.0 and Services 5.0. 19-Oct-82 9:41:05 - Beeley - Added use of Volume.PageCount; modified SetMaxPages 5-Aug-83 13:59:36 - Jacks - Changes as part of PSCommand rework: Changed CommandInterface.TraceLevel to PSState.TraceLevel. 8-Nov-83 14:26:39 - Jacks - Removed dependency on PSState by defining TraceLevel locally. 22-Jan-84 10:26:09 - Jacks - Converted to 8.0 FS. 30-Jan-84 17:16:37 - Jacks - Changed file references to file IDs. 9-Nov-84 10:58:32 - Jacks - Added default nullHandle to Delete. 14-Jun-85 16:45:10 - Jacks - Added copyright notice. 22-Jul-85 15:05:54 - Jacks - Removed GetDirectory, GetPages and SetMaxPages; changed GetPages to return only # of pages allocated; changed CreateTempFile 'pages' parm to 'fBytes'. QueueFile.mesa Copyright (C) Xerox Corporation 1981, 1982, 1983, 1984, 1985, 1986. All rights reserved. Last edited by Jacks: 22-Jul-85 15:05:57 Tim Diebert: December 22, 1986 1:56:48 pm PST <> Create and Open a temporary file (no directory, deleted when Closed). Must provide file handle if file is already open. ID returned is a nullID. MakePermanent: PROCEDURE [file: FS.OpenFile --, attrs: NSFile.AttributeList -- ]; Move the file to spooling directory. ΚΆ˜codešœ™KšœX™XKšœ(™(K™-—K˜K™6K˜šΟk ˜ Kšœœ ˜Kšœœœ˜Kšœ œ ˜—K˜KšΠln œœ œ˜$˜KšΟnœœ˜KšŸ œœ˜K˜Kšœ œ˜)—˜šŸœ œ"œœœ œœœ˜zKšœE™E——˜šŸœ œ œœœœœœ ˜UKšœK™K——˜KšŸ œ œœ$˜FšŸ œ œœ Οc"œ™QKšœ$™$——˜KšŸœ œ˜(—˜Kšœ˜—K˜Kš˜Kšœœ#˜>Kšœ2œ˜6K˜\K˜]K˜R˜QK˜{K˜Z—Kšœ.œ˜2˜AK˜?—K˜4K˜³—…—j &