-- Copyright (C) 1982  by Xerox Corporation. All rights reserved. 
-- TimeServerFormatOld.mesa, HGM,  7-Mar-82 21:36:48

DIRECTORY
  WireFormat USING [WireLongNumber],
  System USING [WestEast];

TimeServerFormatOld: DEFINITIONS =
  BEGIN

  request: CARDINAL = 1;
  response: CARDINAL = 2;

  TimeFormat: TYPE = MACHINE DEPENDENT RECORD [
    time: WireFormat.WireLongNumber,  -- word 0 and 1
    zoneS: System.WestEast,  -- start of word 2
    zoneH: [0..177B],
    zoneM: [0..377B],  -- end of word 2
    beginDST: WORD,  -- word 3
    endDST: WORD,  -- word 4
    spare: ARRAY [5..8) OF WORD ¬ ALL[0]];

  END.