<> <> <> <> DIRECTORY NSString USING [Character, String], TTY USING [CharStatus, Handle]; NSTTY: CEDAR DEFINITIONS = BEGIN <> SetLinePosition: PROCEDURE [h: TTY.Handle, position: CARDINAL]; <> SetPagination: PROCEDURE [h: TTY.Handle, pageLength: CARDINAL] RETURNS [oldPageLength: CARDINAL]; <> NewSetPagination: PROCEDURE [h: TTY.Handle, pageLength: CARDINAL] RETURNS [oldPageLength: CARDINAL]; <> <> 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).