<<>> <> <> <> <> <> <> <> <> DIRECTORY ProcessorFace USING [ProcessorType]; SystemVersion: DEFINITIONS = BEGIN Date: TYPE = CARD; <> <<>> <<>> <> MachineType: TYPE = ProcessorFace.ProcessorType; machineType: READONLY MachineType; GetMachineType: PROC RETURNS [MachineType]; GetMachineTypeName: PROC [MachineType] RETURNS[ATOM]; MachineTypeFromName: PROC [ATOM] RETURNS [MachineType]; <> <<>> LastMachineType: PROC RETURNS[MachineType]; <> <<>> <> ReleaseNumber: TYPE = MACHINE DEPENDENT RECORD [ major(0): CARDINAL, minor(1): CARDINAL, patch(2): CARDINAL ]; release: READONLY ReleaseNumber; END.