DIRECTORY
Cursors, FeedbackTypes, GGInterfaceTypes, GGModelTypes, Imager, IO, Rope, ViewerClasses;

GGUIUtility: CEDAR DEFINITIONS =
BEGIN

DisplayStyle: TYPE = GGModelTypes.DisplayStyle;
FeatureData: TYPE = GGInterfaceTypes.FeatureData;
GGData: TYPE = GGInterfaceTypes.GGData;
GravityType: TYPE = GGInterfaceTypes.GravityType;

DescribeFeature: PROC [feature: FeatureData, hitData: REF ANY, ggData: GGData] RETURNS [rope: Rope.ROPE];
DescribeSourceFeature: PROC [feature: FeatureData, ggData: GGData] RETURNS [rope: Rope.ROPE];
GravityTypeToRope: PROC [gravityType: GravityType] RETURNS [rope: Rope.ROPE];
GravityTypeFromRope: PROC [rope: Rope.ROPE] RETURNS [gravityType: GravityType];

DisplayStyleToRope: PROC [displayStyle: DisplayStyle] RETURNS [rope: Rope.ROPE];
DisplayStyleFromRope: PROC [rope: Rope.ROPE] RETURNS [displayStyle: DisplayStyle];

SafeClose: PROC [stream: IO.STREAM, router: FeedbackTypes.MsgRouter ¬ NIL];
GGHomeDirectory: PROC RETURNS [Rope.ROPE];

GetSpecialColor: PROC RETURNS [color: Imager.Color];
ParseFeedbackRope: PROC [rope: Rope.ROPE] RETURNS [val: REF ANY];
END.

  ”  
GGUIUtility.mesa
Copyright Ó 1986, 1992 by Xerox Corporation.  All rights reserved.
Bier, October 31, 1988 11:16:12 pm PST
Contents:  Utility routines for the user interface level of Gargoyle.

Close "stream".  If there are problems, report them to router and continue anyway.

Returns directory name in which help material and auxiliary files may be found

SetCursorType: PROC [actionArea: ViewerClasses.Viewer, cursor: Cursors.CursorType]; -- No longer needed, Bier, August 29, 1991
set the cursor type for an action area.
get a special color that tracks the ColorTool color patch (formerly in GGUtility)

parses a token with the "EBMesaLisp" parser

Êñ  •NewlineDelimiter
–(cedarcode) style™ codešœ™Kšœ	Ïeœ6™BKšœ&™&KšœE™EK™ —šÏk	˜	KšœX˜X—K˜ Kšœžœžœ˜ Kšž˜˜ Kšœžœ˜/Kšœžœ ˜1Kšœžœ˜'Kšœžœ ˜1—K˜ KšÏnœžœ!žœžœžœžœ˜iKšŸœžœ(žœžœ˜]KšŸœžœžœžœ˜MKšŸœžœžœžœ˜OK˜ KšŸœžœžœžœ˜PKšŸœžœžœžœ˜RK˜ š
Ÿ	œžœ
žœžœ$žœ˜KK™RK™ —šŸœžœžœžœ˜*K™NK™ —šŸœžœk™~K™'K˜ —procšŸœžœžœ˜4L™QL™ —šŸœžœžœžœžœžœ˜AK™+K™ —Kšžœ˜K˜ — …—    J  Ï  