invalidate-memoized ( inputs... word -- )

Vocabulary

memoize

Inputs

inputs...	an object
word	an object

Outputs

None

Definition

USING: accessors assocs effects kernel memoize.private sequences
words ;

IN: memoize

: invalidate-memoized ( inputs... word -- )
    [ stack-effect in>> packer call ] [
        "memoize" word-prop dup sequence?
        [ f swap set-first ] [ delete-at ] if
    ] bi ;