Handbook
Glossary
ungraft-later ( gadget -- )
Vocabulary
ui
.
gadgets
.
private
Inputs
gadget
an
object
Outputs
None
Definition
USING:
accessors
combinators
kernel
;
IN:
ui.gadgets.private
:
ungraft-later
( gadget -- )
dup
graft-state>>
{
{
{
f
f
}
[
drop
]
}
{
{
t
f
}
[
drop
]
}
{
{
f
t
}
[
unqueue-graft
]
}
{
{
t
t
}
[
queue-ungraft
]
}
}
case
;