GGParseOut.mesa
Copyright Ó 1986, 1987, 1988 by Xerox Corporation. All rights reserved.
Last edited by Pier on March 25, 1988 4:26:07 pm PST
Contents: Routines which turn various Gargoyle data structures into Rope.ROPEs and write them onto a file stream.
Bier, November 28, 1988 9:12:48 pm PST
DIRECTORY
GGCoreTypes, Imager, ImagerTransformation, IO, Rope, TextNode;
GGParseOut: CEDAR DEFINITIONS = BEGIN
BoundBox: TYPE = GGCoreTypes.BoundBox;
Color: TYPE = Imager.Color;
Point: TYPE = Imager.VEC;
SequenceOfReal: TYPE = GGCoreTypes.SequenceOfReal;
StrokeEnd: TYPE = Imager.StrokeEnd;
StrokeJoint: TYPE = Imager.StrokeJoint;
Imager Types
WriteStrokeEnd: PROC [f: IO.STREAM, strokeEnd: StrokeEnd];
WriteStrokeJoint: PROC [f: IO.STREAM, strokeJoint: StrokeJoint];
WriteColor: PROC [f: IO.STREAM, color: Color];
WritePixelArray: PROC [f: IO.STREAM, pa: Imager.PixelArray];
WriteText: PROC [f: IO.STREAM, text: TextNode.Ref, screenStyle: BOOL];
WritePoint: PROC [f: IO.STREAM, point: Point];
WriteTransformation: PROC [f: IO.STREAM, transform: ImagerTransformation.Transformation];
WriteFactoredTransformation: PROC [f: IO.STREAM, transform: ImagerTransformation.Transformation];
WriteFactoredTransformationVEC: PROC [f: IO.STREAM, transform: ImagerTransformation.Transformation];
Cedar Types
WriteProps: PROC [f: IO.STREAM, props: LIST OF REF ANY];
WriteArrayOfReal: PROC [f: IO.STREAM, reals: SequenceOfReal];
WriteBool: PROC [f: IO.STREAM, bool: BOOL];
WriteListOfRope: PROC [f: IO.STREAM, ropes: LIST OF Rope.ROPE];
WriteScalarButtonValues:
PROC [f:
IO.
STREAM, names:
LIST
OF Rope.
ROPE, values:
LIST
OF
REAL, on:
LIST
OF
BOOL];
Writes out a list of button values in the form:
[F 4.0 4] [F 2.0 2] [F 1.0 1] [F 0.75 3/4] ...
Gargoyle Core Types
WriteBox: PROC [f: IO.STREAM, box: BoundBox];
END.