Make FORGET: M\ ... work

diff --git a/core/definitions/definitions.factor b/core/definitions/definitions.factor
index 5dc38083625e603d48dabd73be37e1778cc7030e..6f9fdaecf577f7b88bf1bbc973fbff0de0f01783 100644 (file)
--- a/core/definitions/definitions.factor
+++ b/core/definitions/definitions.factor
@@ -1,6 +1,6 @@
 ! Copyright (C) 2006, 2009 Slava Pestov.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: kernel sequences namespaces assocs math ;
+USING: kernel sequences namespaces assocs math accessors ;
 IN: definitions
 
 MIXIN: definition
@@ -41,6 +41,8 @@ GENERIC: forget* ( defspec -- )
 
 M: f forget* drop ;
 
+M: wrapper forget* wrapped>> forget* ;
+
 SYMBOL: forgotten-definitions
 
 : forgotten-definition ( defspec -- )