HalfDuplex.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
Garlick on: July 21, 1980 3:52 PM
DIRECTORY
BufferDefs: FROM "BufferDefs" USING [Buffer],
RS232C: FROM "RS232C" USING [ChannelHandle, LineSpeed],
NSAddress: FROM "NSAddress" USING [ProcessorID];
HalfDuplex: DEFINITIONS = BEGIN
procedures
Initialize: PROCEDURE [
chHandle: RS232C.ChannelHandle, lineSpeed: RS232C.LineSpeed,
ourHostNumber: NSAddress.ProcessorID];
Destroy: PROCEDURE;
WaitToSend: PROCEDURE;
SendCompleted: PROCEDURE [moreToSend: BOOLEAN];
CheckForTurnAround: PROCEDURE [b: BufferDefs.Buffer]
RETURNS [throwAway: BOOLEAN];
END.
LOG
Time: July 14, 1980 10:24 AM By: Garlick Action: Created file