From 06feb8ca68f7b61ce1af3a36ba004df7ba842d01 Mon Sep 17 00:00:00 2001
From: slava <slava@factorcode.org>
Date: Wed, 27 Sep 2006 07:15:12 +0000
Subject: [PATCH] word-xt broken

---
 library/words.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/library/words.factor b/library/words.factor
index 8cfde47435..470db22e1d 100644
--- 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