end-recursive-word ( word label -- )

Vocabulary

stack-checker.inlining

Inputs

word	an object
label	an object

Outputs

None

Definition

USING: kernel namespaces stack-checker.state
stack-checker.values stack-checker.visitor ;

IN: stack-checker.inlining

: end-recursive-word ( word label -- )
    [ check-return ] [
        meta-d dup copy-values dup (meta-d) set
        #return-recursive,
    ] bi ;