-- AlpObjectImpls.config
-- Note: this config does not include PublicErrorImpl.
-- Last edited by
-- MBrown on June 16, 1983 12:46 pm
-- Kolling on October 27, 1983 3:09 pm

AlpObjectImpls: CONFIG
IMPORTS
-- Alpine
AlpineFile, AlpineOwner, AlpineTransaction, AlpineVolume, ClientMap,
-- Cedar
Ascii, BasicTime, Booting, LupineRuntime, RefText, Rope, RPC,
RPCLupine, SafeStorage, UserCredentials
EXPORTS
AlpFile, AlpInstance, AlpPrivate, AlpTransaction, AlpineInterimDirectory
CONTROL
AlpInstanceImpl, AlpTransactionImpl, AlpFileImpl, AlpineInterimDirectoryImpl,
AlpineOwnerRpcClientImpl, AlpineOwnerRpcBinderImpl,
AlpineVolumeRpcClientImpl, AlpineVolumeRpcBinderImpl,
AlpineFileRpcClientImpl, AlpineFileRpcBinderImpl,
AlpineTransactionRpcClientImpl, AlpineTransactionRpcBinderImpl =
BEGIN

AlpInstanceImpl;
AlpTransactionImpl;
AlpFileImpl;
AlpineInterimDirectoryImpl;

-- discard the instances of AlpineOwner, AlpineVolume, AlpineFile,
-- and AlpineTransaction exported by the server stubs.
[alpineFile: AlpineFile, AlpineFileRpcControl: AlpineFileRpcControl] ←
AlpineFileRpcClientImpl[];
AlpineFileRpcBinderImpl;
[alpineOwner: AlpineOwner, AlpineOwnerRpcControl: AlpineOwnerRpcControl] ←
AlpineOwnerRpcClientImpl[];
AlpineOwnerRpcBinderImpl;
[alpineTransaction: AlpineTransaction, AlpineTransactionRpcControl:
AlpineTransactionRpcControl] ← AlpineTransactionRpcClientImpl[];
AlpineTransactionRpcBinderImpl;
[alpineVolume: AlpineVolume, AlpineVolumeRpcControl: AlpineVolumeRpcControl] ←
AlpineVolumeRpcClientImpl[];
AlpineVolumeRpcBinderImpl;

END.