NSPilotSystem.mesa
last edited by Willie-Sue, April 4, 1984 1:02:42 pm PST
Lifted from: /Idun/APilot/11.0/Pilot/Public/System.mesa
(last edited by Luniewski on 22-Nov-82 16:53:34)
Copyright (C) Xerox Corporation 1982. All rights reserved.
NSPilotSystem: DEFINITIONS =
BEGIN
Network addresses
NetworkAddress:
TYPE =
MACHINE
DEPENDENT
RECORD [
net: NetworkNumber,
host: HostNumber,
socket: SocketNumber];
NetworkNumber: TYPE [2];
HostNumber: TYPE [3];
SocketNumber: TYPE [1];
nullNetworkAddress: NetworkAddress = [
net: nullNetworkNumber,
host: nullHostNumber,
socket: nullSocketNumber];
nullNetworkNumber: NetworkNumber = LOOPHOLE[LONG[0]];
nullHostNumberRep: MACHINE DEPENDENT RECORD [a, b, c: WORD] = [0, 0, 0];
nullHostNumber: HostNumber = LOOPHOLE[nullHostNumberRep];
broadcastHostNumberRep:
MACHINE
DEPENDENT
RECORD [a, b, c:
WORD] =
[177777B, 177777B, 177777B];
broadcastHostNumber: HostNumber = LOOPHOLE[broadcastHostNumberRep];
nullSocketNumber: SocketNumber = LOOPHOLE[0];
localHostNumber: READONLY HostNumber;
echoerSocket: SocketNumber = LOOPHOLE[2]; -- from NSConstants
END.