OuterFacade.mesa
last modified by Satterthwaite, October 7, 1982 1:45 pm
Last Edited by: Maxwell, July 29, 1983 9:59 am
DIRECTORY
CompilerOps: TYPE CompilerOps USING [LetterSwitches, Transaction],
BridgeCompilerOps:
TYPE
USING [
AppendHerald, CompilerVersion, DefaultSwitches, DoTransaction, Start, Stop],
TimeStamp: TYPE USING [Stamp];
OuterFacade: PROGRAM IMPORTS C: BridgeCompilerOps EXPORTS CompilerOps ~ {
LetterSwitches: TYPE ~ CompilerOps.LetterSwitches;
Transaction: TYPE ~ CompilerOps.Transaction;
inquiries
DefaultSwitches:
PUBLIC
PROC
RETURNS [LetterSwitches] ~ {
RETURN [C.DefaultSwitches[]]};
CompilerVersion:
PUBLIC
PROC
RETURNS [TimeStamp.Stamp] ~ {
RETURN [C.CompilerVersion[]]};
AppendHerald: PUBLIC PROC [s: LONG STRING] ~ {C.AppendHerald[s]};
Start: PUBLIC PROC [scratchZone: UNCOUNTED ZONE] ~ {C.Start[scratchZone]};
DoTransaction:
PUBLIC
PROC [parms:
POINTER
TO Transaction] ~ {
C.DoTransaction[parms]};
Stop: PUBLIC PROC ~ {C.Stop[]};
Punt: PUBLIC ERROR ~ CODE;
}.