nth-or-last ( n seq -- elt )

Vocabulary

tools.profiler.sampling.private

Inputs

n	an object
seq	an object

Outputs

elt

an object

Definition

USING: kernel sequences ;

IN: tools.profiler.sampling.private

: nth-or-last ( n seq -- elt )
    [ drop f ] [ 2dup bounds-check? [ nth ] [ nip last ] if ]
    if-empty ;