diff --git a/extra/memoize/memoize.factor b/extra/memoize/memoize.factor
index 4136f9eaff..6a223fdc7e 100755
--- a/extra/memoize/memoize.factor
+++ b/extra/memoize/memoize.factor
@@ -52,3 +52,6 @@ M: memoized definition "memo-quot" word-prop ;
 
 : reset-memoized ( word -- )
     "memoize" word-prop clear-assoc ;
+
+: invalidate-memoized ! ( inputs... word )
+    [ #in packer call ] [ "memoize" word-prop delete-at ] bi ;