DIRECTORY Rope USING[ Length, ROPE ], Target USING[ Basic, Consultation, Exception, Simple ], TargetRpcControl USING[ ImportInterface ], UserCredentials USING [Get]; TargetClientImpl: CEDAR PROGRAM IMPORTS Rope, Target, TargetRpcControl, UserCredentials = BEGIN user: Rope.ROPE; [name: user] _ UserCredentials.Get[]; TargetRpcControl.ImportInterface[interfaceName: [instance: user]]; DO Target.Basic[ ! Target.Consultation => RESUME ]; [,] _ Target.Simple[Rope.Length["a"], NEW[INT _ 4] ! Target.Exception => CONTINUE ]; ENDLOOP; END. lLupine: client of example interface TargetClientImpl.mesa Andrew Birrell September 14, 1983 9:07 am Êí˜Jšœ#™#Jšœ™Jšœ*™*J˜šÏk ˜ Jšœœ œ˜Jšœœ+˜7Jšœœ˜*Jšœœ˜—J˜šœ ˜Jšœ2˜9—J˜Jš˜J˜Jšœ œ˜J˜Jšœ%˜%J˜JšœB˜BJ˜š˜Jšœ'œ˜0Jšœ&œœœ˜T—Jšœ˜J˜Jšœ˜J˜—…—"{