bound-index ( list -- )

Vocabulary

ui.gadgets.lists

Inputs

list

an object

Outputs

None

Definition

USING: accessors kernel ;

IN: ui.gadgets.lists

: bound-index ( list -- )
    dup index>> over calc-bounded-index >>index drop ;