Handbook
Glossary
<elevator> ( vector -- elevator )
Vocabulary
ui
.
gadgets
.
sliders
.
private
Inputs
vector
an
object
Outputs
elevator
an
object
Definition
USING:
accessors
kernel
;
IN:
ui.gadgets.sliders.private
:
<elevator>
( vector -- elevator )
elevator
new
swap
>>orientation
;