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]; eftp: Socket = [0, 0, 0, 20B]; statistics: Socket = [0, 0, 0, 22B]; copyDisk: Socket = [0, 0, 0, 25B]; smalltalkMisc: Socket = [0, 0, 0, 26B]; lispStatistics: Socket = [0, 0, 0, 33B]; rpc: Socket = [0, 0, 0, 36B]; leaf: Socket = [0, 0, 0, 43B]; tapeServer: Socket = [0, 0, 0, 44B]; broadcastRpc: Socket = [0, 0, 0, 45B]; gvRSEnquiry: Socket = [0, 0, 0, 50B]; 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 }. ΰPupWKS.mesa Copyright c 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. mail: Socket = [0, 0, 0, 7]; earsStatus: Socket = [0, 0, 0, 21B]; oldCopyDisk: Socket = [0, 0, 0, 24B]; eventReport: Socket = [0, 0, 0, 30B]; printerReport: Socket = [0, 0, 0, 31B]; juniperPackConversion: Socket = [0, 0, 0, 34B]; juniperEvent: Socket = [0, 0, 0, 35B]; clearinghouse: Socket = [0, 0, 0, 37B]; librarian: Socket = [0, 0, 0, 41B]; wifs: Socket = [0, 0, 0, 42B]; gvRSUpdate: Socket = [0, 0, 0, 51B]; 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 Κͺ˜codešœ ™ Kšœ Οmœ1™