STPConnectionCache:
CEDAR
DEFINITIONS = {
ROPE: TYPE = Rope.ROPE;
Handle: TYPE = REF HandleRec;
HandleRec:
TYPE =
RECORD [
host: ROPE,
stpHandle: STP.Handle,
private: REF ANY];
Get:
PROC [host, client:
ROPE]
RETURNS [h: Handle];
Returns a handle logged into named host.
client contains some identification of user program; for debugging deadlocks.
Release:
PROC [h: Handle, timeout:
INT
--seconds--];
The connection will be closed after the timeout, unless someone else asks for same host.
}.