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; WriteColor: PROC [f: IO.STREAM, color: Color]; WriteStrokeEnd: PROC [f: IO.STREAM, lineEnds: StrokeEnd]; WritePoint: PROC [f: IO.STREAM, point: Point]; WriteTransformation: PROC [f: IO.STREAM, transform: ImagerTransformation.Transformation]; WriteFactoredTransformation: 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. GGParseOut.mesa Copyright c 1986, 1987 by Xerox Corporation. All rights reserved. Last edited by Pier on January 30, 1987 10:21:55 am PST Contents: Routines which turn various Gargoyle data structures into Rope.ROPEs and write them onto a file stream. ΚŒ˜codešœ™Kšœ Οmœ7™BKšœ7™7Kšœr™r—K™šΟk ˜ Kšœ+žœ˜5—K˜Kšœ žœž œž˜%˜Iprocšœ žœ˜'Lšœžœ˜Lšœžœ˜!Lšœžœ˜3Lšœ žœ˜#L˜—KšΟn œžœžœžœ˜/KšŸœžœžœžœ˜:KšŸ œžœžœžœ˜.KšŸœžœžœžœ2˜YKšŸœžœžœžœ2˜aKšŸœžœžœžœ˜-Lš Ÿ œžœžœžœžœ˜+LšŸ œžœžœžœ žœžœžœžœ˜8KšŸœžœžœžœ˜=K˜Kšžœ˜—…—Vθ