Fix bad interaction between annotations and generic words
parent
aed0ca0d19
commit
a71665d821
|
@ -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 ;
|
||||
|
|
Loading…
Reference in New Issue