DIRECTORY PupDefs, Rope USING [ ROPE ], UserCredentials USING [State]; ComputeServerUser: CEDAR DEFINITIONS = BEGIN ROPE: TYPE = Rope.ROPE; rBoolean: PROC [listenerPupAddress: PupDefs.PupAddress, key: Rope.ROPE, default: BOOLEAN _ FALSE] RETURNS [value: BOOLEAN]; rNumber: PROC [listenerPupAddress: PupDefs.PupAddress, key: Rope.ROPE, default: INT _ 0] RETURNS [value: INT]; rToken: PROC [listenerPupAddress: PupDefs.PupAddress, key: Rope.ROPE, default: Rope.ROPE _ NIL] RETURNS [value: Rope.ROPE]; rListOfTokens: PROC [listenerPupAddress: PupDefs.PupAddress, key: Rope.ROPE, default: LIST OF Rope.ROPE _ NIL] RETURNS [value: LIST OF Rope.ROPE]; rLine: PROC [listenerPupAddress: PupDefs.PupAddress, key: Rope.ROPE, default: Rope.ROPE _ NIL] RETURNS [value: Rope.ROPE]; rGetProfileName: PROC [listenerPupAddress: PupDefs.PupAddress] RETURNS [Rope.ROPE]; rGetState: PROC [listenerPupAddress: PupDefs.PupAddress] RETURNS [UserCredentials.State]; rGet: PROC [listenerPupAddress: PupDefs.PupAddress] RETURNS [name, password: Rope.ROPE]; END.... φComputeServerUser.mesa Compute Server callback interface for user functions (UserProfile and UserCredentials) for the Summoner. This RPC interface is between the Server (client for this interface) and the Client (who is the server for this interface). The Client and Server reverse rolls here because this is a callback interface. Last Edited by: Bob Hagmann, November 26, 1984 3:36:40 pm PST Copyright c 1984 by Xerox Corporation. All rights reserved. For UserProfile For UserCredentials ΚΞ˜headšœ™Ibodyšœ΅™΅L™=Jšœ Οmœ1™