active-variable ( seq symbol -- seq )

Vocabulary

stack-checker.branches

Inputs

seq	an object
symbol	an object

Outputs

seq

an object

Definition

USING: assocs kernel sequences stack-checker.state ;

IN: stack-checker.branches

: active-variable ( seq symbol -- seq )
    [ [ terminated? over at [ drop f ] when ] map ] dip
    branch-variable ;