<> <> <> <> <<>> DIRECTORY CD; CDStretchyExtras: CEDAR DEFINITIONS = BEGIN MatchProc: TYPE = PROC [me: CD.ObPtr, r: CD.DesignRect, layer: CD.Layer, prim: BOOL, horz: BOOL] RETURNS [BOOL]; Match: PROC[me: CD.ObPtr, r: CD.DesignRect, layer: CD.Layer, prim: BOOL, horz: BOOL] RETURNS [BOOL]; HasMatchProc: PROC [me: CD.ObPtr] RETURNS [BOOL]; InstallMatch: PROC [type: REF CD.ObjectProcs, match: MatchProc]; END.