extra-at ( count map -- extra )

Vocabulary

ui.text.index-maps

Inputs

count	an object
map	an object

Outputs

extra

an object

Definition

USING: accessors kernel math sequences ;

IN: ui.text.index-maps

: extra-at ( count map -- extra )
    extras>> over zero? [ 2drop 0 ] [ swap 1 - swap nth ] if ;