TrcTool.mesa
Copyright © 1986 by Xerox Corporation. All rights reserved.
Eric Nickell, January 25, 1987 5:22:26 am PST
DIRECTORY
Trc,
ViewerClasses;
TrcTool: CEDAR DEFINITIONS
~ BEGIN
MakeTrcTool: PROC [info: ViewerClasses.ViewerRec, paint: BOOL] RETURNS [v: ViewerClasses.Viewer];
NewSelectableTrc: PROC [underlyingFlavor: ATOM ← NIL] RETURNS [trc: Trc.TRC];
Makes a trc which the user can easily control.
SelectNewTrc: PROC [trc, under: Trc.TRC, paint, notify: BOOL ← TRUE];
Place a new trc under the selectable trc.
CurrentSelection: PROC [trc: Trc.TRC] RETURNS [under: Trc.TRC];
Gives the current trc underneath. Should be used infrequently, as you never know when it will change.
END.