Make FORGET: M\ ... work
parent
24d854fb8e
commit
c9defa6494
|
@ -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 -- )
|
||||
|
|
Loading…
Reference in New Issue