Fix compiled-xref

2008-02-06 13:51:16 -06:00 · 2008-02-06 13:51:16 -06:00 · f7ca140c23
parent be2c8b13d7
commit f7ca140c23
1 changed files with 1 additions and 1 deletions
--- a/core/words/words.factor
+++ b/core/words/words.factor
@ -99,7 +99,7 @@ SYMBOL: compiled-crossref
 compiled-crossref global [ H{ } assoc-like ] change-at

 : compiled-xref ( word dependencies -- )
-    [ crossref? ] subset
+    [ drop crossref? ] assoc-subset
    2dup "compiled-uses" set-word-prop
    compiled-crossref get add-vertex* ;