word-xt broken

2006-09-27 07:15:12 +00:00 · 2006-09-27 07:15:12 +00:00 · 06feb8ca68
parent fc0cea8e42
commit 06feb8ca68
1 changed files with 1 additions and 1 deletions
--- a/library/words.factor
+++ b/library/words.factor
@ -50,7 +50,7 @@ M: symbol definer drop \ SYMBOL: ;
    [ nip remove-word-prop ] if ;

 GENERIC: word-xt ( word -- xt )
-M: word word-xt 7 integer-slot ;
+M: word word-xt 8 integer-slot ;

 SYMBOL: vocabularies