DIRECTORY ThSmarts, ThSmartsSunRPC, ThSmartsSunRPCServer, Thrush, ThrushSunRPC, ThrushSunRPCConvert; ThSmartsSunRPCToThSmarts: CEDAR PROGRAM IMPORTS ThSmarts, ThrushSunRPCConvert EXPORTS ThSmartsSunRPCServer ~ { OPEN ThSmartsSunRPC, ThSmartsSunRPCServer, ThrushSunRPCConvert; Substitution: PUBLIC SubstitutionType = { ThSmarts.Substitution[shh: Thrush.none, convEvent: SrToConvEvent[convEvent], oldPartyID: oldPartyID, newPartyID: newPartyID]; }; ReportAction: PUBLIC ReportActionType = { ThSmarts.ReportAction[shh: Thrush.none, report: SrToActionReport[report]]; }; CheckIn: PUBLIC CheckInType = { ThSmarts.CheckIn[shh: Thrush.none, credentials: SrToCredentials[credentials], voicePath: voicePath, reason: SrToATOM[reason], remark: SrToROPE[remark], nextScheduledCheck: nextScheduledCheck]; }; Progress: PUBLIC ProgressType = { ThSmarts.Progress[shh: Thrush.none, convEvent: SrToConvEvent[convEvent]]; }; }. ² ThSmartsSunRPCToThSmarts.mesa Copyright Σ 1990 by Xerox Corporation. All rights reserved. Pier, May 18, 1990 6:10:44 pm PDT Polle Zellweger (PTZ) October 29, 1990 5:06:10 pm PST Exports ThSmartsSunRPCServer, which is called by ThSmartsSunRPCServerStub, and calls the real ThSmarts routines. Polle Zellweger (PTZ) October 29, 1990 5:05:59 pm PST Allow detection of NIL ropes across a SunRPC connection. changes to: CheckIn ΚX•NewlineDelimiter ™codešœ™K™