-- HalfDuplex.mesa (last edited by: 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