NSTTY.mesa
Copyright (C) 1984, 1985, 1986 by Xerox Corporation. All rights reserved.
Last edited by McManis: 29-Apr-85 15:59:24
Tim Diebert: December 9, 1986 2:05:31 pm PST
DIRECTORY
NSString USING [Character, String],
TTY USING [CharStatus, Handle];
NSTTY: CEDAR DEFINITIONS = BEGIN
SetLinePosition:
PROCEDURE [h:
TTY.Handle, position:
CARDINAL];
First column is at position=0
SetPagination:
PROCEDURE [h:
TTY.Handle, pageLength:
CARDINAL]
RETURNS [oldPageLength:
CARDINAL];
pageLength=0 implies no pagination
NewSetPagination:
PROCEDURE [h:
TTY.Handle, pageLength:
CARDINAL]
RETURNS [oldPageLength:
CARDINAL];
pageLength=0 implies no pagination
NSString input procedures
GetChar: PROCEDURE [h: TTY.Handle] RETURNS [c: NSString.Character];
GetString:
PROCEDURE [h:
TTY.Handle, s: NSString.String,
t:
PROCEDURE [c: NSString.Character]
RETURNS [status:
TTY.CharStatus]];
GetEditedString:
PROCEDURE [h:
TTY.Handle, s: NSString.String,
t: PROCEDURE [c: NSString.Character] RETURNS [status: TTY.CharStatus]]
RETURNS [c: NSString.Character];
PutString: PROCEDURE [h: TTY.Handle, s: NSString.String];
PutLine: PROCEDURE [h: TTY.Handle, s: NSString.String];
PutChar: PROCEDURE [h: TTY.Handle, c: NSString.Character];
END.
LOG [Time - Person - Action]
14-Nov-83 15:04:46 - Alfvin - Added PutString, PutLine, PutChar. Took "NS" out of Get commands. Changed SetLinePosition parameter to pageLength: CARDINAL from on: BOOLEAN.
29-Apr-85 15:59:31 - McManis - Changed SetPagination to return oldPageLength (replaces NSTTYExtras.NewSetPagination).