<<>> <> <> <> <> DIRECTORY RPC USING [ InterfaceName ], RefID, Rope, Thrush; LarkFeepRpcControl: CEDAR DEFINITIONS = BEGIN InterfaceName: TYPE = RPC.InterfaceName; InterfaceRecord: TYPE = REF InterfaceRecordObject; InterfaceRecordObject: TYPE = RECORD [ myInterface: REF ¬ NIL, paramZones: RpcZones ¬ RpcStandardZones, clientStubFeep: SAFE PROCEDURE [interface: InterfaceRecord, shhh: Thrush.SHHH, serviceID: RefID.ID, convID: Thrush.ConversationID, requestingParty: Thrush.PartyID, number: Rope.ROPE, noisy: BOOLEAN, on, off: CARDINAL] RETURNS [nb: Thrush.NB], clientStubFlash: SAFE PROCEDURE [interface: InterfaceRecord, shhh: Thrush.SHHH, serviceID: RefID.ID, convID: Thrush.ConversationID, requestingParty: Thrush.PartyID, actionID: Thrush.ActionID, extraTime: CARDINAL] RETURNS [nb: Thrush.NB], bound: BOOL ¬ FALSE]; RpcZones: TYPE = RECORD [ gc: REF ¬ NIL, heap: REF ¬ NIL, mds: REF ¬ NIL ]; RpcStandardZones: RpcZones = []; END.