<> <> <> <> <> DIRECTORY ComputeServerClient, IO, Rope; ComputeClientExtras: CEDAR DEFINITIONS = BEGIN ROPE: TYPE = Rope.ROPE; PendingRequest: TYPE = RECORD[ service: ROPE, serverName: ROPE, process: PROCESS ]; StartServiceExtra: PROC [service: ROPE, version: ROPE _ NIL, cmdLine: ROPE, in, out: IO.STREAM, queueService: BOOL _ FALSE, timeToWait: INT _ 3600, retries: NAT _ 3, serverName: ROPE _ NIL] RETURNS [found: BOOL, success: ComputeServerClient.RemoteSuccess, remoteMsg: ROPE, serverInstance: ROPE]; <> <<>> <> OutstandingRequests: PROC RETURNS [requests: LIST OF PendingRequest]; <> RemoteProcessSite: PROC [process: PROCESS] RETURNS [serverName: ROPE]; <> END. <<>>