BcdStamps.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
last edit by Satterthwaite, May 12, 1986 11:54:21 am PDT
DIRECTORY
Basics: TYPE USING [Comparison],
CompilerOps: TYPE USING [LetterSwitches],
TimeStamp: TYPE USING [Stamp];
BcdStamps: CEDAR DEFINITIONS ~ {
Stamp: TYPE ~ TimeStamp.Stamp;
CompareStamps: PROC[s1, s2: Stamp] RETURNS[Basics.Comparison];
Compute: PROC[
srcCreate: LONG CARDINAL,
switches: CompilerOps.LetterSwitches, compilerVersion: TimeStamp.Stamp,
directoryEnumerator: PROC[PROC[TimeStamp.Stamp]]]
RETURNS[bcdVers: TimeStamp.Stamp];
for computing a version stamp
the directoryStamps are in the order of the DIRECTORY clause
stamps for the hidden directory entries are not included
precise switches must be specified (except /d, /g, /p are ignored)
}.