<> <> DIRECTORY OldCompilerOps: TYPE CompilerOps USING [LetterSwitches, StreamId, Transaction], Strings: TYPE USING [String], TimeStamp: TYPE USING [Stamp]; BridgeCompilerOps: DEFINITIONS = { <> LetterSwitches: TYPE = OldCompilerOps.LetterSwitches; Transaction: TYPE = OldCompilerOps.Transaction; StreamId: TYPE = OldCompilerOps.StreamId; <> DefaultSwitches: PROC RETURNS [LetterSwitches]; CompilerVersion: PROC RETURNS [TimeStamp.Stamp]; AppendHerald: PROC [Strings.String]; <> Start: PROC [scratchZone: UNCOUNTED ZONE]; DoTransaction: PROC [POINTER TO Transaction]; -- really a VAR Stop: PROC; Punt: ERROR; }.