ImagerSysExtras.mesa
Copyright Ó 1993 by Xerox Corporation. All rights reserved.
Russ Atkinson (RRA) April 20, 1993 3:58 pm PDT
ImagerSysExtras:
CEDAR
DEFINITIONS
~ BEGIN OPEN BasicTime, Rope;
DoInWDir:
PROC [inner:
PROC, dir:
ROPE];
Executes inner with the given directory as the working directory (NIL => the current directory).
Protect:
PROC [inner:
PROC]
RETURNS [
ROPE];
Executes inner and returns a message if a file error or IO error occurred during the call, otherwise returns NIL.
GetInfo:
PROC [name:
ROPE]
RETURNS [bytes:
INT, create:
GMT, modify:
GMT];
Gets the info for the named file. bytes < 0 => the file does not exist. The modify time will be equal to the create time if the underlying file system only supports a create time.