FinchTTY.mesa
Copyright Ó 1987 by Xerox Corporation. All rights reserved.
Last Edited by: Swinehart, May 11, 1987 4:35:16 pm PDT
DIRECTORY
Rope USING [ ROPE ],
Thrush USING [ ConversationID, NB, nullConvID ]
;
FinchTTY: CEDAR DEFINITIONS = {
PutRope: PROC[convID: Thrush.ConversationID←Thrush.nullConvID, rope: Rope.ROPE]
RETURNS [nb: Thrush.NB, newConvID: Thrush.ConversationID ];
Send the rope to the TTY-A port on the associated Lark, if any. Creates a conversation, if necessary. Use that convID in subsequent calls. For the duration of the conversation (kill it when done), input characters on the TTY-A port will be reported, one at a time, as ActionReports, class $larktty, type $getchar.
}.
Swinehart, September 25, 1986 9:10:34 am PDT
Extracted from LarkSynthesizer