HostAndTerminalOps.Mesa
Copyright Ó 1992 by Xerox Corporation. All rights reserved.
Last tweaked by Mike Spreitzer on March 18, 1992 8:02 am PST
DIRECTORY Rope USING [ROPE];
HostAndTerminalOps:
CEDAR
DEFINITIONS
=
BEGIN
ROPE: TYPE ~ Rope.ROPE;
Side: TYPE ~ {Host, Terminal};
ProtocolVersion: TYPE ~ NATURAL[0 .. 100];
ProtocolVersionRange:
TYPE ~
RECORD [
min: ProtocolVersion ¬ ProtocolVersion.FIRST,
max: ProtocolVersion ¬ ProtocolVersion.LAST];
SetProtocolVersionRangeForSide: PROC [side: Side, protocol: ROPE, pvr: ProtocolVersionRange];
GetProtocolVersionRangeForSide: PROC [side: Side, protocol: ROPE] RETURNS [ProtocolVersionRange];
EnumerateProtocolVersionsOfSide: PROC [side: Side, Consume: PROC [ROPE, ProtocolVersionRange]];
END.