[Cyan]<Cedar6.1>Pup>PupWKS.mesa!2

PupWKS.mesa

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