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];
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.