Fix bad interaction between annotations and generic words

db4
Slava Pestov 2008-02-16 15:55:25 -06:00
parent aed0ca0d19
commit a71665d821
1 changed files with 1 additions and 0 deletions

View File

@ -30,6 +30,7 @@ M: generic definer drop f f ;
M: generic definition drop f ;
: make-generic ( word -- )
dup { "unannotated-def" } reset-props
dup dup "combination" word-prop perform-combination define ;
TUPLE: method word def specializer generic loc ;