PupWKS.mesa
Copyright © 1986 by Xerox Corporation. All rights reserved.
Hal Murray, June 3, 1986 9:16:12 pm PDT
This module defines the Well Known Sockets for the Pup world.
They are used to contact servers. (aka Binding)
There are no TYPEs in this interface, so recompilation shouldn't be a disaster. Please do not include this interface in any other interfaces, for example, by defaulting a socket assignment.
DIRECTORY
Pup USING [Socket];
PupWKS: CEDAR DEFINITIONS = {
Socket: TYPE = Pup.Socket;
telnet: Socket = [0, 0, 0, 1];
gatewayInfo: Socket = [0, 0, 0, 2];
ftp: Socket = [0, 0, 0, 3];
misc: Socket = [0, 0, 0, 4];
echo: Socket = [0, 0, 0, 5];
bspSink: Socket = [0, 0, 0, 6];
mail: Socket = [0, 0, 0, 7];
eftp: Socket = [0, 0, 0, 20B];
earsStatus: Socket = [0, 0, 0, 21B];
statistics: Socket = [0, 0, 0, 22B];
oldCopyDisk: Socket = [0, 0, 0, 24B];
copyDisk: Socket = [0, 0, 0, 25B];
smalltalkMisc: Socket = [0, 0, 0, 26B];
eventReport: Socket = [0, 0, 0, 30B];
printerReport: Socket = [0, 0, 0, 31B];
lispStatistics: Socket = [0, 0, 0, 33B];
juniperPackConversion: Socket = [0, 0, 0, 34B];
juniperEvent: Socket = [0, 0, 0, 35B];
rpc: Socket = [0, 0, 0, 36B];
clearinghouse: Socket = [0, 0, 0, 37B];
librarian: Socket = [0, 0, 0, 41B];
wifs: Socket = [0, 0, 0, 42B];
leaf: Socket = [0, 0, 0, 43B];
tapeServer: Socket = [0, 0, 0, 44B];
broadcastRpc: Socket = [0, 0, 0, 45B];
gvRSEnquiry: Socket = [0, 0, 0, 50B];
gvRSUpdate: Socket = [0, 0, 0, 51B];
gvRSPoll: Socket = [0, 0, 0, 52B];
gvLily: Socket = [0, 0, 0, 53B];
gvMSPoll: Socket = [0, 0, 0, 54B];
gvMSForward: Socket = [0, 0, 0, 55B];
gvMSClientInput: Socket = [0, 0, 0, 56B];
gvMSRetrieve: Socket = [0, 0, 0, 57B];
teleSwat: Socket = [0, 0, 0, 60B];
fileLookup: Socket = [0, 0, 0, 61B];
moTel: Socket = [0, 0, 0, 62B]; -- LISP TeleDebugging
portifinoMCDN: Socket = [0, 0, 0, 70B];
portifinoPACX: Socket = [0, 0, 0, 73B];
juniperPine: Socket = [0, 0, 0, 100B];
wfs: Socket = [0, 0, 1, 20B]; -- 420B
}.