(FILECREATED " 2-Aug-85 11:58:36" ("compiled on " {IVY}LISP>RPC>RPCEVALCLIENT.;9) "19-Mar-85 14:34:17" recompiled exprs: MovdsForRPCEval ImportRPCEval UnimportRPCEval DispatchRPCEvalSignals RPCClientStub.RPCEval RPCClientStub.RPCApply in "INTERLISP-D 19-Jun-85 ..." dated "19-Jun-85 10:24:28") (FILECREATED " 2-Aug-85 11:58:27" {IVY}LISP>RPC>RPCEVALCLIENT.;9 3887 changes to: (FNS MovdsForRPCEval ImportRPCEval UnimportRPCEval DispatchRPCEvalSignals RPCClientStub.RPCEval RPCClientStub.RPCApply)) MovdsForRPCEval D1 (P 0 p) o°dHH µîh(24Q PUTD 21Q GETD) NIL ( 3 ((RPCClientStub.RPCApply . RPCApply) (RPCClientStub.RPCEval . RPCEval))) ImportRPCEval D1 (I 2 version I 1 instance I 0 type) @µoAB `(13Q ImportInterface) (22Q RPCEvalClientInterface 16Q RPCEvalClientInterface) ( 6 "RPCEval 2-Aug-85 11:57:29830") UnimportRPCEval D1 (I 0 l..interface) 5@µ`°&`ž@ @` o@ d ¿µøh(51Q UnimportInterface 43Q ERROR 27Q DREMOVE 20Q UnimportInterface) (62Q RPCEvalClientInterface 32Q RPCEvalClientInterface 24Q RPCEvalClientInterface 12Q RPCEvalClientInterface 5 RPCEvalClientInterface) ( 37Q "not imported") DispatchRPCEvalSignals D1 (P 0 l..result I 1 l..conv I 0 l..cPup) ,@A lð²g@A ¸@ ¿@HA ‚@(50Q SHOULDNT 43Q \MarshalArb 34Q \StartReturn 27Q Signal 24Q \UnmarshalArb 4 \GetArgWord) (17Q RemoteLispError) () RPCClientStub.RPCEval D1 (P 1 l..cPup P 0 l..interface I 2 l..conv I 1 l..interfaceArg I 0 form) 5Aµ`HHB YdlB I@B IgB YdB I ¿(61Q \RELEASE.PUP 55Q \UnmarshalArb 47Q \Call 37Q \MarshalArb 31Q \AddPupWord 21Q \StartCall) (43Q DispatchRPCEvalSignals 5 RPCEvalClientInterface) () RPCClientStub.RPCApply D1 (P 1 l..cPup P 0 l..interface I 3 l..conv I 2 l..interfaceArg I 1 args I 0 fn) ;Bµ`HHC YdlC I@C IAC IgC YdC I ¿(67Q \RELEASE.PUP 63Q \UnmarshalArb 55Q \Call 45Q \MarshalArb 37Q \MarshalArb 31Q \AddPupWord 21Q \StartCall) (51Q DispatchRPCEvalSignals 5 RPCEvalClientInterface) () (PRETTYCOMPRINT RPCEVALCLIENTCOMS) (RPAQQ RPCEVALCLIENTCOMS ((* Created by Lupine " 2-Aug-85 11:57:30") (FNS MovdsForRPCEval ImportRPCEval UnimportRPCEval DispatchRPCEvalSignals RPCClientStub.RPCEval RPCClientStub.RPCApply) ( VARS (RPCEvalClientInterface)) (GLOBALVARS RPCEvalClientInterface) (P (MovdsForRPCEval)) (DECLARE: EVAL@LOAD DONTEVAL@COMPILE DOCOPY (FILES (SYSLOAD) RPC)))) (RPAQQ RPCEvalClientInterface NIL) (MovdsForRPCEval) (FILESLOAD (SYSLOAD) RPC) (PUTPROPS RPCEVALCLIENT COPYRIGHT ("Xerox Corporation" 1985)) NIL