XlSpeedHacks.mesa
Copyright Ó 1989, 1991 by Xerox Corporation. All rights reserved.
Christian Jacobi, January 18, 1989 2:34:14 pm PST
Christian Jacobi, October 21, 1992 5:57 pm PDT
DIRECTORY
Xl USING [Connection, SequenceNo];
XlSpeedHacks: CEDAR DEFINITIONS
SHARES Xl
~ BEGIN OPEN Xl;
UsedSequenceNumber: PROC [c: Connection] RETURNS [SequenceNo] = INLINE {
Returns last sequence number which has been used by the client. Warning: This is not monitored and another thread can bump the number anytime.
RETURN [c.sequenceNumber];
};
ReportedSequenceNumber: PROC [c: Connection] RETURNS [SequenceNo];
Returns last sequence number which has been reported from the server in a reply or a error message.
InitiateRoundTrip: PROC [c: Connection, flush: BOOL ¬ TRUE] RETURNS [SequenceNo];
Initiates round-trip and returns its sequence number
Does not raise errors if c is alive (In particular no XError's)
WaitInitiatedRange: PROC [c: Connection, s: SequenceNo, flush: BOOL ¬ FALSE];
If s reasonable and not too old then waits until reply is sent
If s is too old or not reasonable, returns immediately
flush: flush before waiting
Does not raise errors if c is alive (In particular no XError's)
END.