<> <> <> <> DIRECTORY CD USING [DesignRect, ObPtr]; CDInterestRects: CEDAR DEFINITIONS = BEGIN <<-- InterestRect: A special rectangle associated to an object.>> <<-- It defaults to the objects innerrect.>> GetInterestRect: PROC [ob: CD.ObPtr] RETURNS [r: CD.DesignRect, useInnerrect: BOOL]; SetInterestRect: PROC [ob: CD.ObPtr, r: CD.DesignRect_[0,0,-1,-1]]; <<--using the bad, default rectangle denotes usage of innerrrect >> <<-- Some object classes propagate the interestrects of their children, some do not.>> END.