System: DEFINITIONS = BEGIN Microseconds: TYPE = LONG CARDINAL; Pulses: TYPE = RECORD [pulses: LONG CARDINAL]; GetClockPulses: PROCEDURE RETURNS [p: Pulses]; PulsesToMicroseconds: PROCEDURE [p: Pulses] RETURNS [m: Microseconds]; MicrosecondsToPulses: PROCEDURE [m: Microseconds] RETURNS [p: Pulses]; Overflow: ERROR; Switches: TYPE = PACKED ARRAY CHARACTER OF UpDown; UpDown: TYPE = MACHINE DEPENDENT {up (0), down (1)}; switches: READONLY Switches; defaultSwitches: Switches = ALL[up]; isUtilityPilot: READONLY BOOLEAN; IsUtilityPilot: PROCEDURE RETURNS [BOOLEAN] = INLINE {RETURN[isUtilityPilot]}; END. FSystem.mesa (last edited by Plass on August 31, 1984 1:24:59 pm PDT) Cedar PilotBridge version Copyright (C) Xerox Corporation 1982. All rights reserved. Interval timing System boot switches August 31, 1984 1:24:59 pm PDT by Plass: Created Cedar PilotBridge version, considerably stripped down from the XDE version. ÊQ˜JšœG™GJ™J˜Jšœ:™:J˜JšœÏk œ˜J˜Jš˜˜Jšœ™J˜—Jšœœœœ˜#Jš œœœ œœ˜.JšÏnœ œœ ˜.Jšžœ œ œ˜FJšžœ œœ ˜FJšœ œ˜J˜˜Jšœ™J˜—Jš œ œœœ œœ˜2Jšœœœ œ˜4Jšœ œ ˜Jšœœ˜$Jšœœœ˜!Jš žœ œœœœœ˜NJ˜Jšœ˜Jšœ|™|—…—hÿ