DIRECTORY Rope USING [ROPE], TextNode USING [Location, Ref], ViewerClasses USING [Viewer], ViewerOps USING [PaintHint]; TEditDocumentPrivate: CEDAR DEFINITIONS = BEGIN Viewer: TYPE = ViewerClasses.Viewer; ROPE: TYPE = Rope.ROPE; RecordUnsavedDocument: PROC [fileName: ROPE, root: TextNode.Ref]; FindUnsavedDocument: PROC [fileName: ROPE] RETURNS [root: TextNode.Ref]; PositionHistory: TYPE = RECORD [ pos, prev: TextNode.Location ]; InitViewerDoc: PROC [self: Viewer, data: REF ANY]; CancelLinks: PROC [viewer: Viewer]; EmptyViewer: PROC [parent: Viewer]; NewViewer: PROC [parent: Viewer]; DoNewViewer: PROC [parent: ViewerClasses.Viewer _ NIL] RETURNS [new: ViewerClasses.Viewer]; CloseAndNewViewer: PROC [parent: Viewer]; DoCloseAndNewViewer: PROC [parent: ViewerClasses.Viewer] RETURNS [new: ViewerClasses.Viewer]; OpenFile: PROC [parent: Viewer]; DoOpenFile: PROC [fileName: ROPE _ NIL, parent, fileNameProcViewer: Viewer _ NIL] RETURNS [viewer: Viewer]; CloseAndOpenFile: PROC [parent: Viewer, fileNameProcViewer: Viewer _ NIL]; DoCloseAndOpenFile: PROC [parent: Viewer, fileName: ROPE _ NIL] RETURNS [viewer: Viewer]; OpenImplFile: PROC [parent: Viewer]; DoOpenImplFile: PROC [fileName: ROPE _ NIL, parent: Viewer _ NIL] RETURNS [viewer: Viewer]; CloseAndOpenImplFile: PROC [parent: Viewer]; DoCloseAndOpenImplFile: PROC [parent: Viewer, fileName: ROPE _ NIL] RETURNS [viewer: Viewer]; LoadFile: PROC [parent: Viewer]; DoLoadFile: PROC [ parent: ViewerClasses.Viewer, fileName: ROPE _ NIL, close: BOOL _ FALSE, fileNameProcViewer: ViewerClasses.Viewer _ NIL] RETURNS [viewer: Viewer]; LoadImplFile: PROC [parent: Viewer]; DoLoadImplFile: PROC [parent: ViewerClasses.Viewer, fileName: ROPE _ NIL, close: BOOL _ FALSE] RETURNS [viewer: Viewer]; AnonymousLoadFile: PROC [ parent: Viewer, fileNameProcViewer: ViewerClasses.Viewer _ NIL]; AnonymousLoadImplFile: PROC [parent: Viewer]; LoadPreviousFile: PROC [parent: Viewer]; OpenPreviousFile: PROC [parent: Viewer]; CloseAndOpenPreviousFile: PROC [parent: Viewer]; StoreFile: PROC [parent: Viewer]; DoStoreFile: PUBLIC PROC [parent: Viewer, fileName: Rope.ROPE _ NIL]; PositionViewer: PROC [viewer: Viewer, loc: TextNode.Location, hint: ViewerOps.PaintHint _ client] RETURNS [ok: BOOLEAN]; DefaultMenus: PROC [viewer: Viewer, paint: BOOL _ FALSE]; END. tTEditDocumentPrivate.mesa; Edited by Paxton on October 28, 1982 10:51 am by Plass on October 11, 1983 3:54 pm Ê…˜šœH™HJšœ$™$—J˜šÏk ˜ Jšœœœ˜Jšœ œ˜Jšœœ ˜Jšœ œ ˜J˜—Jšœœ˜/J˜Jšœœ˜$Jšœœœ˜J˜JšÏnœœ œ˜AJ˜Jšžœœ œœ˜HJ˜šœœœ"˜@J˜—Jšž œœœœ˜2J˜Jšž œœ˜#J˜Jšž œœ˜#J˜Jšž œœ˜!J˜šž œœ!œ˜6Jšœ˜$J˜—Jšžœœ˜)J˜šžœœ˜8Jšœ˜$J˜—Jšžœœ˜ J˜š ž œœ œœ'œ˜QJšœ˜J˜—Jšžœœ/œ˜JJ˜šžœœœœ˜?Jšœ˜J˜—Jšž œœ˜$J˜š žœœ œœœ˜AJšœ˜J˜—Jšžœœ˜,J˜šžœœœœ˜CJšœ˜J˜—Jšžœœ˜ J˜šž œœ˜Jšœ(œœ ˜HJšœ+œ˜/Jšœ˜—J˜Jšž œœ˜$J˜š žœœ*œœ œ˜^Jšœ˜—J˜šžœœ˜Jšœ;œ˜@—J˜Jšžœœ˜-J˜Jšžœœ˜(J˜Jšžœœ˜(J˜Jšžœœ˜0J˜Jšž œœ˜!J˜Jš ž œœœ!œœ˜EJ˜šžœœN˜bJšœœ˜J˜—Jš ž œœœœ˜9J˜Jšœ˜J˜J˜—…— ( !