BridgeREdit.Mesa
Copyright Ó 1988, 1990, 1992 by Xerox Corporation. All rights reserved.
Eduardo Pelegri-Llopart January 23, 1989 4:07:27 pm PST
Demers, May 1, 1990 11:23 am PDT
Definitions module for a Bridge REdit server using Tioga as the editor.
DIRECTORY
IO USING [STREAM],
Rope USING [ROPE],
TiogaOps USING [Ref],
ViewerClasses USING [Viewer]
;
BridgeREdit: CEDAR DEFINITIONS ~ {
Types
ViewerToRopeProc: TYPE ~ PROC [treeNodeViewer: ViewerClasses.Viewer] RETURNS [plain: Rope.ROPE, translateCRLF: BOOL]; -- For use in ViewerToStream procs.
NameToNameProc: TYPE ~ PROC [original: Rope.ROPE] RETURNS [new: Rope.ROPE]; -- How to get the new name from the old one.
Constants
writerTiogaProperty: READONLY ATOM;
Errors
WriterError: ERROR;
Registration Procedures
RegisterNewWriter: PROC [
name: Rope.ROPE,  -- name under which command is registered
writerProc: ViewerToRopeProc -- proc to invoke
];
RegisterNewNamer: PROC [
name: Rope.ROPE,  -- name under which command is registered
namerProc: NameToNameProc -- proc to invoke
];
Access Procedures
IsThisStreamATiogaFile: PROC [h: IO.STREAM] RETURNS [yes: BOOL, len: INT];
Stolen from FSstreamImpl.mesa
IsThisDocTioga: PROC [doc: TiogaOps.Ref] RETURNS [simple: BOOL];
Stolen from PutFileImpl.SimpleFile
}.