TEditPrivate.mesa
Copyright Ó 1985, 1986, 1987, 1988, 1991, 1992 by Xerox Corporation. All rights reserved.
Edited by Paxton on November 3, 1982 8:26 am
Doug Wyatt, April 23, 1992 11:21 am PDT
DIRECTORY
TIPTypes USING [TIPTable],
Rope USING [ROPE],
TEditDocument USING [Selection],
ViewerClasses USING [InitProc, NotifyProc, PaintProc, SaveProc];
TEditPrivate: CEDAR DEFINITIONS = BEGIN
SaveTEditDocument: ViewerClasses.SaveProc;
in TEditDocumentsImpl
InitTEditDocument: ViewerClasses.InitProc;
in TEditDocumentsImpl
PaintTEditDocument: ViewerClasses.PaintProc;
in TEditDisplayImpl
TEditNotifyProc: ViewerClasses.NotifyProc;
in TEditInputImpl
TypeScriptNotifyProc: ViewerClasses.NotifyProc;
in TEditTypeScriptImpl
CaretAtEnd: PROC [sel: TEditDocument.Selection] RETURNS [BOOL];
Returns true if insertion point for this selection is at end of document. For use with typescripts to decide if editing like regular Tioga document or not.
TIPTable: TYPE ~ TIPTypes.TIPTable;
tiogaTIP: TIPTable;
ReloadTipTable: PROC; -- for $Text viewers
ReloadReadonlyTipTable: PROC; -- for readonly $Text viewers
typeScriptTIP: TIPTable;
ReloadTypeScriptTipTable: PROC; -- for $Typescript viewers
ReloadTable: PROC [oldTIP: TIPTable, profileKey, default: Rope.ROPE]
RETURNS [newTIP: TIPTable];
END.