From a22fadaee44ba2fc34f7cffe4e718cb37c9c3236 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Sun, 31 Jan 2010 02:50:47 +1300
Subject: [PATCH] words: fix unit test

---
 core/words/words-tests.factor | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/core/words/words-tests.factor b/core/words/words-tests.factor
index 4f30e9a899..46b20bf2e6 100644
--- a/core/words/words-tests.factor
+++ b/core/words/words-tests.factor
@@ -122,8 +122,10 @@ DEFER: x
 [ { } ]
 [
     all-words [
-        "compiled-uses" word-prop 2 <groups>
-        keys [ "forgotten" word-prop ] filter
+        [ "effect-dependencies" word-prop ]
+        [ "definition-dependencies" word-prop ]
+        [ "conditional-dependencies" word-prop ] tri
+        3append [ "forgotten" word-prop ] filter
     ] map harvest
 ] unit-test