GGParseOut.mesa
Copyright © 1986, 1987 by Xerox Corporation. All rights reserved.
Last edited by Pier on February 26, 1987 3:07:33 pm PST
Contents: Routines which turn various Gargoyle data structures into Rope.ROPEs and write them onto a file stream.
DIRECTORY
GGBasicTypes, Imager, ImagerTransformation, IO, Rope;
GGParseOut: CEDAR DEFINITIONS = BEGIN
BoundBox: TYPE = GGBasicTypes.BoundBox;
Color: TYPE = Imager.Color;
Point: TYPE = GGBasicTypes.Point;
SequenceOfReal: TYPE = GGBasicTypes.SequenceOfReal;
StrokeEnd: TYPE = Imager.StrokeEnd;
StrokeJoint: TYPE = Imager.StrokeJoint;
WriteStrokeEnd: PROC [f: IO.STREAM, strokeEnd: StrokeEnd];
WriteStrokeJoint: PROC [f: IO.STREAM, strokeJoint: StrokeJoint];
WriteColor: PROC [f: IO.STREAM, color: Color];
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];
WriteBox: PROC [f: IO.STREAM, box: BoundBox];
WriteBOOL: PROC [f: IO.STREAM, bool: BOOL];
WriteProps: PROC [f: IO.STREAM, props: LIST OF REF ANY];
WriteArrayOfReal: PROC [f: IO.STREAM, reals: SequenceOfReal];
END.