Handbook
Glossary
?set-model ( value model -- )
Vocabulary
models
Inputs
value
an
object
model
a
model
Outputs
None
Word description
Similar to
set-model
, but only sets the value if the new value is different.
See also
set-model
,
change-model
,
change-model*
,
(change-model)
,
push-model
,
pop-model
Definition
USING:
accessors
kernel
;
IN:
models
:
?set-model
( value model -- )
2dup
value>>
=
[
2drop
]
[
set-model
]
if
;