ThSystem: CONFIGURATION IMPORTS Atom, BasicTime, BluejayUtils, BTree, BTreeSimple, BTreeVM, Commander, CommandTool, Convert, ExplicitExport, FS, FSBackdoor, IO, List, Log, LupineRuntime, Names, NamesGV, NamesRPC, Process, PrincOpsUtils, ProcessProps, RedBlackTree, RefTab, RefText, Rope, RPC, Rope, RPCLupine, RPCInternalExtras, SafeStorage, UserProfile EXPORTS NamesRPC, Thrush, ThNet, ThParty, ThPartyPrivate, ThSmartsRpcControl, ThVersions, TU, LarkPlay CONTROL NamesGVAuthImpl, TriplesImpl, DESDummy, WhitePagesImpl, WPBTreeImpl, TUImpl, ThVersionsImpl, ThServer --, ThClient -- = { ThServer: CONFIGURATION IMPORTS Atom, BasicTime, BluejayUtils, Commander, CommandTool, Convert, DESFace, ExplicitExport, IO, List, Log, LupineRuntime, Names, NamesGV, NamesRPC, LarkPlay, Process, RedBlackTree, Rope, RPC, RPCLupine, SafeStorage, Thrush, ThNet, ThVersions, Triples, TU EXPORTS ThSmartsPrivate, ThParty, ThPartyPrivate, ThSmartsRpcControl CONTROL RemoteSmarts, ThPartyRpcServerImpl, ThPartyMonitorImpl, ThPartyOpsImpl, ThPartySupervisorImpl, ThPartyInitImpl, LarkSmartsRpcServerImpl, LarkRpcClientImpl, LarkRpcBinderImpl, LarkInImpl, LarkOutImpl, LarkSmartsMonitorImpl, LarkSmartsImpl, LarkSmartsSupImpl, LarkSmartsInitImpl, LarkTrunkSmartsImpl = { RemoteSmarts: CONFIGURATION IMPORTS LupineRuntime, Rope, RPCLupine EXPORTS ThSmartsRpcControl CONTROL ThSmartsRpcClientImpl, ThSmartsRpcBinderImpl = { ThSmartsRpcClientImpl; ThSmartsRpcBinderImpl; }; RemoteSmarts; ThPartyMonitorImpl; ThPartyInitImpl; ThPartyOpsImpl; ThPartySupervisorImpl; ThPartyRpcServerImpl; LarkSmartsRpcServerImpl; LarkRpcClientImpl; LarkRpcBinderImpl; LarkSmartsMonitorImpl; LarkSmartsSupImpl; LarkSmartsImpl; LarkTrunkSmartsImpl; LarkSmartsInitImpl; LarkInImpl; LarkOutImpl; }; WhitePagesImpl; WPBTreeImpl; ThVersionsImpl; ThServer; TUImpl; NamesGVAuthImpl; TriplesImpl; DESDummy; LarkPlayImpl; }. 4ThSystem.config Copyright c 1985 by Xerox Corporation. All rights reserved. Swinehart on February 2, 1986 11:35:02 pm PST It is OK for a package that knows it's local to bind directly to these interfaces. ThClient: CONFIGURATION IMPORTS ConvertUnsafe, Heap, IO, LupineRuntime, Names, Process, Rope, RopeInline, RPC, RPCLupine, AMBridge, SafeStorage, ThSmartsPrivate, Thrush, ThNet, UnsafeStorage, UserProfile CONTROL LarkSmartsRpcClientImpl --, LarkRpcServerImpl, LarkSimImpl -- = { LarkSmartsRpcClientImpl; LarkRpcServerImpl; LarkSimImpl; }; ThClient; ΚΖ˜šœ™Icodešœ Οmœ1™˜ΙJšŸœSŸœ ˜fJšŸœgΟcœ˜‚šžœŸ ˜JšŸœXŸœ]Ÿœ@˜ƒšŸœ=˜DJ™R—šŸœ―˜Άšž œŸ ˜JšŸœ˜&JšŸœ˜šŸœ1˜8Jšœ˜Jšœ˜——J˜Jšœ ˜ J˜Jšœ˜J˜J˜J˜Jšœ˜Jšœ˜Jšœ˜J˜Jšœ˜Jšœ˜J˜J˜Jšœ ˜ J˜ Jšœ˜——šžœŸ ™JšŸœŸœ3Ÿœ_™΅šŸœ %œ™IJšœ™Jšœ™Jšœ ™ Jšœ™——Jšœ˜Jšœ ˜ J˜šœ ˜ Jšœ ™ —Jšœ˜J˜J˜ J˜ J˜ —Jšœ˜—…—X R