DIRECTORY Rope USING [ROPE], RPCEcho USING [Page, TenPages, TenWords], RPCEchoRpcControl USING [ExportInterface]; RPCEchoServerImpl: CEDAR MONITOR IMPORTS RPCEchoRpcControl EXPORTS RPCEcho = { ROPE: TYPE = Rope.ROPE; Page: TYPE = RPCEcho.Page; TenPages: TYPE = RPCEcho.TenPages; TenWords: TYPE = RPCEcho.TenWords; Error: PUBLIC ERROR = CODE; Simple: PUBLIC PROC = {}; SloshTenWords: PUBLIC PROC [tenWords: TenWords] RETURNS [mumble: TenWords] = { RETURN[tenWords]; }; SloshPage: PUBLIC PROC [page: Page] RETURNS [mumble: Page] = { RETURN[page]; }; SloshTenPages: PUBLIC PROC [pages: TenPages] RETURNS [mumble: TenPages] = { RETURN[pages]; }; PushPage: PUBLIC PROC [page: Page] = {}; PullPage: PUBLIC PROC RETURNS [mumble: Page] = {}; DoAtom: PUBLIC PROC [atom: ATOM] = {}; DoRope: PUBLIC PROC [rope: ROPE] = {}; RPCEchoRpcControl.ExportInterface[ interfaceName: [instance: NIL], user: NIL, password: NULL ]; }. šRPCEchoServerImpl.mesa Copyright c 1986 by Xerox Corporation. All rights reserved. Hal Murray, January 22, 1986 11:12:36 pm PST Export the Impls ΚΠ˜šœ™Icodešœ Οmœ1™Kšžœ˜ K˜K˜—šŸ œž œžœ˜KKšžœ˜K˜K˜—šŸœž œ˜(K˜—šŸœž œžœ˜2K˜—šŸœž œžœ˜&K˜—šŸœž œžœ˜&K˜—šœ"˜"Jšœžœ žœ žœ˜