-- AlpObjectDebugImpls.config
-- This config can be loaded by an implementor after loading AlpObjectImpls
-- Last edited by
--   MBrown on June 16, 1983 4:14 pm


AlpObjectDebugImpls: CONFIGURATION
   IMPORTS
     AlpPrivate, AlpineDebug, AlpineFile, 
     Atom, ConvertUnsafe, Heap, LupineRuntime, Rope, RopeInline,
     RPC, RPCLupine, RTTypesBasic, SafeStorage, UnsafeStorage
   EXPORTS AlpDebug
   CONTROL
     AlpineDebugRpcClientImpl,
     AlpineDebugRpcBinderImpl,
     AlpDebugImpl =
  BEGIN

  AlpDebugImpl;

  -- discard the instance of AlpineDebug exported by the server stubs.
  [alpineDebug: AlpineDebug, AlpineDebugRpcControl: AlpineDebugRpcControl] ←
      AlpineDebugRpcClientImpl[];
  AlpineDebugRpcBinderImpl;

  END.