CDFeedback.Mesa
Last Edited by: Spreitzer, December 13, 1984 6:13:49 pm PST
DIRECTORY
CD, ImagerTransform, Rope;
CDFeedback: CEDAR DEFINITIONS =
{
Transform: TYPE = ImagerTransform.Transformation;
Showing: TYPE = REF ShowingRep;
ShowingRep: TYPE;
CellType: TYPE = Rope.ROPE;
top: CellType = NIL;
Show:
PROC [
design: CD.Design,
rect: CD.Rect,
Will be clipped to bounding box of containing cells.
message: Rope.ROPENIL,
Goes on the application as value of $SignalName property.
flag: ATOM ← $feedback,
Goes on the application as value of feedbackKey property.
in: CellType,
EnumerateSomeInstances: PROC [
cellType: CellType,
to: PROC [transform: Transform, parent: CellType] RETURNS [stop: BOOL]
]
EnumerateSomeInstances may enumerate as many or as few (even none, if you're willing to live with the consequences) of the instances of cellType as it wishes.
]
RETURNS [showing: Showing];
May raise: (both are informational (i.e., RESUMEing is OK))
EmptyShow: SIGNAL;
NoneVisible: SIGNAL;
UnShow: PROC [showing: Showing];
feedbackKey: ATOM;
}.