GGStateExtras.mesa
Contents: Routines for getting and setting values in the Gargoyle user interface state.
Copyright Ó 1986, 1987, 1992 by Xerox Corporation. All rights reserved.
Pier, September 18, 1990 11:09 am PDT
Bier, March 19, 1993 4:00 pm PST
DIRECTORY
GGBasicTypes, GGCoreTypes, GGFont, GGHistoryTypes, GGInterfaceTypes, GGModelTypes, Imager, ImagerTransformation, Rope;
GGStateExtras: CEDAR DEFINITIONS = BEGIN
Caret: TYPE = GGInterfaceTypes.Caret;
DefaultData: TYPE = GGModelTypes.DefaultData;
DisplayStyle: TYPE = GGModelTypes.DisplayStyle;
ExtendMode: TYPE = GGModelTypes.ExtendMode;
FeatureCycler: TYPE = GGInterfaceTypes.FeatureCycler;
FontData: TYPE = GGFont.FontData;
GGData: TYPE = GGInterfaceTypes.GGData;
GravityType: TYPE = GGInterfaceTypes.GravityType;
HistoryEvent: TYPE = GGHistoryTypes.HistoryEvent;
SelectMode: TYPE = GGModelTypes.SelectMode;
SequenceOfReal: TYPE = GGCoreTypes.SequenceOfReal;
SliceDescriptor: TYPE = GGModelTypes.SliceDescriptor;
StrokeEnd: TYPE = GGModelTypes.StrokeEnd;
StrokeJoint: TYPE = GGModelTypes.StrokeJoint;
Transformation: TYPE = ImagerTransformation.Transformation;
ROPE: TYPE = Rope.ROPE;
Vector: TYPE = GGBasicTypes.Vector;
RegisterViewportProc: PROC [ggData: GGData, proc: ViewportProc, clientData: REF ¬ NIL];
ViewportProc: TYPE = PROC [ggData: GGData, clientData: REF ¬ NIL] RETURNS [rect: Imager.Rectangle];
Gargoyle can call this routine to find out how large its window is.
DefaultViewport: ViewportProc; -- gets the viewport size from the BiScroller
This ViewportProc is registered automatically when Gargoyle starts up.
GetWorkingDirectory: PROC [ggData: GGData] RETURNS [ROPE];
SetWorkingDirectory: PROC [ggData: GGData, directory: ROPE];
END.