<<>> <> <> <> <> <> DIRECTORY EBTypes, Rope, ViewerClasses; TiogaActive: CEDAR DEFINITIONS = BEGIN ActiveDoc: TYPE ~ EBTypes.ActiveDoc; Viewer: TYPE ~ ViewerClasses.Viewer; GetButtonContents: PROC [button: EBTypes.ActiveButton] RETURNS [Rope.ROPE]; <> <<>> LookupDoc: PROC [viewer: Viewer] RETURNS [doc: ActiveDoc]; <> <<>> Interpret: PROC [tiogaViewer: Viewer, button: EBTypes.ActiveButton, doc: EBTypes.ActiveDoc, events: LIST OF REF]; END.