DIRECTORY Lines2dTypes, Rope; GGCoreTypes: CEDAR DEFINITIONS = BEGIN EventListt: TYPE = REF EventListtObj; -- spelled with two t's to indicate a "List and a Tail pointer" EventListtObj: TYPE = RECORD [ list: LIST OF Event, tail: LIST OF Event ]; Event: TYPE = LIST OF REF ANY; RopeListt: TYPE = REF RopeListtObj; RopeListtObj: TYPE = RECORD [ list: LIST OF Rope.ROPE, tail: LIST OF Rope.ROPE ]; SequenceOfReal: TYPE = REF SequenceOfRealObj; SequenceOfRealObj: TYPE = RECORD [ reals: SEQUENCE len: NAT OF REAL]; BoundBox: TYPE = REF BoundBoxObj; BoundBoxObj: TYPE = RECORD [loX, loY, hiX, hiY: REAL, null, infinite: BOOL]; Edge: TYPE = Lines2dTypes.Edge; EdgeObj: TYPE = Lines2dTypes.EdgeObj; Line: TYPE = Lines2dTypes.Line; LineObj: TYPE = Lines2dTypes.LineObj; END. ΪGGCoreTypes.mesa Copyright c 1986 by Xerox Corporation. All rights reserved. Last edited by Bier on July 15, 1987 5:48:14 pm PDT Contents: Types shared by Gargoyle, Gargoyle3d, and the Gargoyle core routines. ΚΙ˜J˜Icodešœ™Kšœ Οmœ1™