<<>> <> <> <<(last edited by: DXG on: 26-Sep-84 2:28:43)>> <> <> HostNumbers: CEDAR DEFINITIONS = BEGIN <> <> <> <> <> <> <> HostNumber: TYPE = MACHINE DEPENDENT RECORD [a, b, c, d, e, f: BYTE]; nullHostNumber: HostNumber = [0, 0, 0, 0, 0, 0]; <> <> ProcessorID: TYPE = RECORD [HostNumber]; <> <<>> IsProcessorID: PROC [hn: LONG POINTER TO HostNumber] RETURNS [BOOL] = TRUSTED INLINE {RETURN[hn.a MOD 2=0]}; nullProcessorID: ProcessorID = [nullHostNumber]; <> MulticastID: TYPE = RECORD [HostNumber]; <> <<>> IsMulticastID: PROC [hn: LONG POINTER TO HostNumber] RETURNS[BOOL] = TRUSTED INLINE {RETURN[hn.a MOD 2#0]}; broadcastHostNumber: HostNumber = [255, 255, 255, 255, 255, 255]; <> END. LOG December 1, 1980 6:18 PM PXM Created file 4-Nov-81 8:33:37 AWL Formatting changes. Time: 26-Sep-84 2:28:39 By: DXG Action: Added copyright notice and rebuild for 11.1 release.