-- LupineTimeTestCombined.config.
-- Copyright (C) 1985 by Xerox Corporation. All rights reserved.
-- Last edited by BZM on 12-May-82 19:34:38.
-- Bob Hagmann February 8, 1985 5:12:29 pm PST

-- Single machine timing test program. See TimeTestLupine.cm.


LupineTimeTestCombined: CONFIGURATION
IMPORTS
 Heap, Inline, LupineRuntime, MesaRPC, Process, RPCLupine, Runtime,
 SpyClient, String, System, Time, TTY
CONTROL LupineTimeTestBinder, LupineTimeTestDriver
= BEGIN


-- Rpc runtime.
-- RpcRuntime is loaded via the command line.


-- The time test implementation (server).

[serverTimeTest: LupineTimeTest] ← LupineTimeTestImpl[];

[serverRpcControl: LupineTimeTestRpcControl] ←
LupineTimeTestRpcServerImpl[
 serverTimeTest, RPCLupine, LupineRuntime, Heap ];


-- The time test driver (client).

[clientTimeTest: LupineTimeTest,
clientRpcControl: LupineTimeTestRpcControl ] ←
LupineTimeTestRpcClientImpl[];

LupineTimeTestDriver[
 clientTimeTest, Heap, Process, Runtime,
 SpyClient, String, System, Time, TTY ];


-- The time test binder (client).

LupineTimeTestBinder[
 clientRpcControl, serverRpcControl, MesaRPC, Runtime ];


END. -- LupineTimeTestCombined.

Bob Hagmann February 8, 1985 5:12:09 pm PST

Bob Hagmann February 8, 1985 5:12:29 pm PST