A control is a gadget which is linked to an underlying model by having its model slot set to a model instance.

Some utility words useful in control implementations:

control-value ( control -- value )

set-control-value ( value control -- )

Graft handling:

graft ( gadget -- )

notify ( gadget -- )

ungraft ( gadget -- )

unqueue-graft ( gadget -- )

See also
Models