TiogaAccessViewers.mesa
Copyright Ó 1985, 1986, 1991 by Xerox Corporation. All rights reserved.
Michael Plass, March 25, 1985 10:04:18 am PST
Willie-s, February 12, 1991 2:03 pm PST
Doug Wyatt, December 17, 1991 6:18 pm PST
Provides a TiogaAccess interface to text viewers and the current selection.
DIRECTORY
TiogaAccess USING [Reader, Writer],
ViewerClasses USING [Viewer];
TiogaAccessViewers: CEDAR DEFINITIONS ~ BEGIN
Reader operations
Reader: TYPE ~ TiogaAccess.Reader;
FromSelection: PROC RETURNS [Reader];
Makes a reader on a copy of the contents of the primary selection.
FromViewer: PROC [viewer: ViewerClasses.Viewer] RETURNS [Reader];
Must be a text or typescript viewer.
Makes a reader on a copy of the viewer contents.
Writer operations
Writer: TYPE ~ TiogaAccess.Writer;
WriteSelection: PROC [writer: Writer];
Replaces the primary selection. Clients should use TiogaOps.CallWithLocks or equivalent to avoid race conditions with the user.
WriteViewer: PROC [writer: Writer, viewer: ViewerClasses.Viewer];
Must be a text or typescript viewer.
Replaces the contents of the viewer.
END.