DIRECTORY BasicTime USING [GMT], FS USING [OpenFile], PrincOps USING [ControlModule], Rope USING [ROPE]; Loader: DEFINITIONS = BEGIN OPEN BasicTime, FS, PrincOps, Rope; Instantiate: PROC[file: OpenFile, pageOffset: INT _ 0, codeLinks: BOOL _ TRUE] RETURNS[cm: ControlModule, unboundImports: LIST OF IRItem]; IRItem: TYPE = RECORD[interfaceName: ROPE, index: NAT]; IRList: TYPE = LIST OF IRItem; Start: PROC[cm: ControlModule]; MakeProcedureResident: SAFE PROC[proc: PROC ANY RETURNS ANY]; MakeProcedureSwappable: PROC[proc: PROC ANY RETURNS ANY]; MakeGlobalFrameResident: SAFE PROC[proc: PROC ANY RETURNS ANY]; MakeGlobalFrameSwappable: PROC[proc: PROC ANY RETURNS ANY]; BCDBuildTime: SAFE PROC[proc: PROC ANY RETURNS ANY _ NIL] RETURNS[GMT]; Error: ERROR[type: ErrorType, message: ROPE _ NIL]; ErrorType: TYPE = { invalidBcd, fileNotFound, versionMismatch, loadStateFull, insufficientVM }; END. dLoader.mesa Copyright c 1985 by Xerox Corporation. All rights reserved. Rovner, August 15, 1983 11:49 am Levin, September 22, 1983 1:06 pm Russ Atkinson (RRA) February 4, 1985 4:43:28 pm PST offset is the offset within the file of the first page of the BCD. This is normally 0. Instantiate can raise Error Start the given control module, which must have resulted from an Instantiate. Pins the code for a given procedure. Unpins the code for a given procedure. Pins the global frame for a given procedure. Unpins the global frame for a given procedure. Returns the time that a given bcd file was built. Κ@˜codešœ ™ Kšœ Οmœ1™