GGStateExtras.mesa
Contents: Routines for getting and setting values in the Gargoyle user interface state.
Copyright Ó 1986, 1987 by Xerox Corporation. All rights reserved.
Pier, September 18, 1990 11:09 am PDT
Bier, January 27, 1992 2:29 pm PST
DIRECTORY
BiScrollers, 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.