InstallPrivate.Mesa
Copyright © 1986 by Xerox Corporation. All rights reserved.
Spreitzer, February 21, 1986 5:14:38 pm PST
DIRECTORY HashTable, Install;
InstallPrivate:
CEDAR
DEFINITIONS
= BEGIN OPEN Install;
Data: TYPE = REF DataPrivate;
DataPrivate:
TYPE =
MONITORED
RECORD [
statuses: HashTable.Table,
change: CONDITION
];
Status: TYPE = REF StatusPrivate;
StatusPrivate:
TYPE =
RECORD [
state: State ← notDone,
result: REF ANY
];
State: TYPE = {notDone, inProgress, done};
END.