DIRECTORY Rope USING [ROPE], Buttons USING [ButtonProc], Menus USING [MenuEntry, MenuProc], TiogaNode USING [Location, RefBranchNode], ViewerClasses USING [Viewer], ViewerOps USING [PaintHint]; TiogaDocumentPrivate: CEDAR DEFINITIONS = BEGIN Viewer: TYPE = ViewerClasses.Viewer; ROPE: TYPE = Rope.ROPE; RecordUnsavedDocument: PROC [fileName: ROPE, root: TiogaNode.RefBranchNode]; FindUnsavedDocument: PROC [fileName: ROPE] RETURNS [root: TiogaNode.RefBranchNode]; CancelLinks: PROC [viewer: Viewer]; FileIsMoreRecent: PROC [root: TiogaNode.RefBranchNode, file: Rope.ROPE] RETURNS [BOOL]; Reselect: Menus.MenuProc; PositionHistory: TYPE = RECORD [ pos, prev: TiogaNode.Location ]; JumpToPrevious: Menus.MenuProc; InitViewerDoc: PROC [self: Viewer, data: REF ANY]; 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]; PreStore: Menus.MenuProc; StoreFile: PROC [parent: Viewer]; DoStoreFile: PUBLIC PROC [parent: Viewer, fileName: Rope.ROPE _ NIL]; PositionViewer: PROC [viewer: Viewer, loc: TiogaNode.Location, hint: ViewerOps.PaintHint _ client] RETURNS [ok: BOOLEAN]; DefaultMenus: PROC [viewer: Viewer, paint: BOOL _ FALSE]; findMenu, levelMenu: Menus.MenuEntry; FindMenu: Menus.MenuProc; LevelMenu: Menus.MenuProc; PreReset: Menus.MenuProc; Reset: Menus.MenuProc; PreSave: Menus.MenuProc; Save: Menus.MenuProc; PreClear: Menus.MenuProc; Clear: Menus.MenuProc; NewButton: Buttons.ButtonProc; Store: Menus.MenuProc; PreLoadPrevious: Menus.MenuProc; PreviousFile: Menus.MenuProc; PreGetImpl: Menus.MenuProc; GetImpl: Menus.MenuProc; PreGet: Menus.MenuProc; Get: Menus.MenuProc; AnonymousLoadImpl: Menus.MenuProc; AnonymousLoad: Menus.MenuProc; OpenButton: Buttons.ButtonProc; Normalize: Menus.MenuProc; Position: Menus.MenuProc; Find: Menus.MenuProc; FindDef: Menus.MenuProc; FindWord: Menus.MenuProc; Time: Menus.MenuProc; Split: Menus.MenuProc; FewerLevels: Menus.MenuProc; MoreLevels: Menus.MenuProc; AllLevels: Menus.MenuProc; FirstLevelOnly: Menus.MenuProc; END. N-- TiogaDocumentPrivate.mesa; Edited by Paxton on June 20, 1983 1:30 pm Ê>˜JšÏcG™GJ˜šÏk ˜ Jšœžœžœ˜Jšœžœ˜Jšœžœ˜"Jšœ žœ˜*Jšœžœ ˜Jšœ žœ ˜J˜—Jšœžœž œž˜/J˜Jšœžœ˜$Jšžœžœžœ˜J˜JšÏnœžœ žœ!˜LJ˜JšŸœžœ žœžœ!˜SJ˜JšŸ œžœ˜#J˜Jš Ÿœžœ,žœžœžœ˜WJ˜JšŸœ˜J˜šŸœžœžœ#˜AJ˜—JšŸœ˜J˜JšŸ œžœžœžœ˜2J˜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šŸ œžœ˜!J˜Jš Ÿ œžœžœ!žœžœ˜EJ˜šŸœžœO˜cJšžœžœ˜J˜—JšŸ œžœžœžœ˜9J˜J˜%J˜JšŸœ˜J˜JšŸ œ˜J˜JšŸœ˜JšŸœ˜J˜JšŸœ˜JšŸœ˜J˜JšŸœ˜JšŸœ˜J˜JšŸ œ˜J˜JšŸœ˜J˜JšŸœ˜ JšŸ œ˜J˜JšŸ œ˜JšŸœ˜J˜JšŸœ˜JšŸœ˜J˜JšŸœ˜"J˜JšŸ œ˜J˜JšŸ œ˜J˜JšŸ œ˜J˜JšŸœ˜J˜JšŸœ˜J˜JšŸœ˜J˜JšŸœ˜J˜JšŸœ˜J˜JšŸœ˜J˜JšŸ œ˜J˜JšŸ œ˜J˜JšŸ œ˜J˜JšŸœ˜J˜Jšžœ˜J˜J˜—…— ˜$