add-local-quotation ( rstate quot -- rstate )

Vocabulary

stack-checker.recursive-state

Inputs

rstate	an object
quot	an object

Outputs

rstate

an object

Definition

USING: accessors kernel stack-checker.recursive-state.tree ;

IN: stack-checker.recursive-state

: add-local-quotation ( rstate quot -- rstate )
    swap clone [ dupd store ] change-quotations ;