-- OsStaticDefs.Mesa  Edited by Sandman on June 30, 1980  5:00 PM
-- Copyright  Xerox Corporation 1979, 1980

DIRECTORY
  AltoFileDefs USING [CFP],
  InlineDefs USING [BcplLongNumber],
  StringDefs USING [BcplSTRING];

OsStaticDefs: DEFINITIONS SHARES StringDefs =
  BEGIN

  CFP: TYPE = AltoFileDefs.CFP;

  OsStatics: POINTER TO POINTER TO OsStaticRecord = LOOPHOLE[176777B];

  OsStaticRecord: TYPE = PRIVATE MACHINE DEPENDENT RECORD [
    EnumerateFp: POINTER,
    fpSysDir: POINTER TO CFP,
    fpSysStat: POINTER TO CFP,
    fpDiskDescriptor: POINTER TO CFP,
    fpSysLog: POINTER TO CFP,
    fpSysTs: POINTER TO CFP,
    fpUserCm: POINTER TO CFP,
    fpComCm: POINTER TO CFP,
    fpRemCm: POINTER TO CFP,
    fpExecutive: POINTER TO CFP,
    fpSysFont: POINTER TO CFP,
    fpWorkingDir: POINTER TO CFP,
    nameWorkingDir: POINTER TO StringDefs.BcplSTRING,
    OsBuffer: POINTER TO WORD,
    EventVector: PUBLIC POINTER TO WORD,
    UserName: PUBLIC POINTER TO StringDefs.BcplSTRING,
    UserPassword: PUBLIC POINTER TO StringDefs.BcplSTRING,
    OsFinish: POINTER,
    OsFinishCode: PUBLIC CARDINAL,
    OsVersion: PUBLIC CARDINAL,
    OsVersionCompatible: PUBLIC CARDINAL,
    OsFinishSafeAdr: POINTER,
    SerialNumber: PUBLIC CARDINAL,
    lvUserFinishProc: POINTER,
    SysErr: POINTER,
    CounterJunta: POINTER,
    CallSwat: POINTER,
    lvAbortFlag: PUBLIC POINTER TO CARDINAL,
    lvSwatContextProc: POINTER,
    OutLd: POINTER,
    InLd: POINTER,
    BootFrom: POINTER,
    DiskIOSetup: POINTER,
    DiskIOTransfer: POINTER,
    UpdateTime: POINTER,
    lvParitySweepCount: POINTER,
    LastLdCB: POINTER,
    juntaTable: POINTER,
    AltoVersion: PUBLIC AltoVersionNumber,
    ErrorLogAddress: PUBLIC WORD,
    lvParityPhantomEnable: POINTER,
    ClockSecond: PUBLIC POINTER TO InlineDefs.BcplLongNumber];

  AltoVersionNumber: TYPE = MACHINE DEPENDENT RECORD [
    engineeringnumber: [0..17B],
    buildnumber: [0..17B],
    microcodeversion: [0..377B]];

  END...