<trace-step> ( continuation word -- trace-step )

Vocabulary

tools.trace.private

Inputs

continuation	an object
word	an object

Outputs

trace-step

an object

Definition

USING: accessors effects kernel sequences ;

IN: tools.trace.private

: <trace-step> ( continuation word -- trace-step )
    [ nip ] [
        [ data>> ] [ stack-effect in>> length ] bi*
        index-or-length tail*
    ] 2bi \ trace-step-state boa ;