Handbook
Glossary
change-color-index1 ( object quot -- object )
Vocabulary
accessors
Inputs
object
an
object
quot
an
object
Outputs
object
an
object
Definition
USING:
kernel
;
IN:
accessors
:
change-color-index1
( object quot -- object )
over
[
[
color-index1>>
]
dip
call
]
dip
swap
>>color-index1
;
inline