<> <> <> DIRECTORY NSAddress USING [NetworkAddress, NetworkNumber]; AddressTranslation: DEFINITIONS = BEGIN <> <> << ::= ##>> << ::= ##>> << ::= .>> << ::= {a 32 bit number, soon to be 48 bits} | >> << ::= | | | >> << ::= *>> << ::= {48 bit processor ID}>> << ::= a{8 bit number representing the ether address}>> << ::= e{8 bit number requiring 48 bit translation service}>> << ::= {16 bit number}>> NSAddressElement: TYPE = NSAddress.NetworkAddress; NetworkAddress: TYPE = NSAddress.NetworkAddress; StringToNetworkAddress: PROCEDURE [STRING] RETURNS [NetworkAddress]; StringToNSAddressElement: PROCEDURE [STRING] RETURNS [NSAddressElement]; StringToNetworkNumber: PROCEDURE [STRING] RETURNS [NSAddress.NetworkNumber]; BadSyntax: ERROR [field: Field]; Field: TYPE = {net, host, socket}; AppendNetworkAddress: PROCEDURE [s: STRING, nA: NetworkAddress]; AppendNSAddressElement: PROCEDURE [s: STRING, sE: NSAddressElement]; AppendNetworkNumber: PROCEDURE [s: STRING, net: NSAddress.NetworkNumber]; AppendMyNetworkNumber: PROCEDURE [STRING]; -- primary network AppendMyHostNumber: PROCEDURE [STRING]; StringOverflow: ERROR; -- error generated by the above procedures. END. Time: May 9, 1980 11:56 AM By: Dalal Action: created file. Time: June 9, 1980 1:22 PM By: AOF Action: Commented on definition of various fields of . Time: July 29, 1980 12:10 PM By: AOF Action: SIGNALs => ERRORs Time: August 21, 1980 2:37 PM By: AOF Action: Fix NSAddressElement and NetworkAddress so they are opaque.