DIRECTORY CD USING [Design, Instance, Layer, Object, Rect], Core USING [CellType, Design, Wire], CoreRecord USING [CellInstance]; TimValues: CEDAR DEFINITIONS = BEGIN ROPE: TYPE = Rope.ROPE; Value: TYPE = REF; -- Interval / CutValue; Interval: TYPE = REF IntervalRec; IntervalRec: TYPE = RECORD [min, max: INT]; CutValue: TYPE = REF CutValueRec; CutValueRec: TYPE = RECORD [tcut: INT, before, after: Value]; Variable: TYPE = REF VariableRec; VariableRec: TYPE = RECORD [name: ROPE, scale: REAL, wantedError: INT]; MakeInterval: PROC [min, max: INT] RETURNS [interval: Interval]; MakeCutValue: PROC [tcut: INT, before, after: Value] RETURNS [cutValue: CutValue]; Add: PROC [value1, value2: Value] RETURNS [result: VALUE]; touchProcProp: ATOM; Touch: TouchProc; RectAt: PROC [instance: CD.Instance] RETURNS [rect: CD.Rect]; IRectAt: PROC [instance: CD.Instance] RETURNS [rect: CD.Rect]; TouchRect: PROC [instance: CD.Instance, rect: CD.Rect, layer: CD.Layer] RETURNS [yes: BOOL _ FALSE]; END. RTimValues.mesa Copyright c 1985 by Xerox Corporation. All rights reversed. Created by Bertrand Serlet September 11, 1985 10:59:17 am PDT Bertrand Serlet September 11, 1985 12:00:36 pm PDT BS Theory BS Basic Types Utilities Usual Operations TouchProcs are put on property on each class of object that does not use the default (default is expand). It is also possible to have that properties on an object. The callable function Touch is soforth programmed in an Object Oriented manner. Geometry Utilities Returns the BoundingBox of an instance Returns the InterestRect of an instance Κ:˜– "Cedar" stylešœ™Jšœ Οmœ1™J˜Jšœ žœžœ ˜!Jš œ žœžœžœ žœžœ˜G—™ JšΟn œžœ žœžœ˜@Jš‘ œžœžœžœ˜R—™Jš‘œžœžœ žœ˜:J˜JšœΌŸœ4™υJšœžœ˜J˜JšŸœ ˜—™š ‘œžœ žœ žœžœ˜=Jšœ&™&—J˜š ‘œžœ žœ žœžœ˜>Jšœ'™'—J™JšΠbn‘œžœ žœžœžœžœžœžœ˜d——J˜Jšžœ˜—…—ξz