]> gitweb.factorcode.org Git - factor.git/commitdiff
Fix a couple of unit tests that were relying on the old compiler crossref structures
authorSlava Pestov <slava@slava-pestovs-macbook-pro.local>
Sun, 31 Jan 2010 10:26:55 +0000 (23:26 +1300)
committerSlava Pestov <slava@slava-pestovs-macbook-pro.local>
Sun, 31 Jan 2010 10:26:55 +0000 (23:26 +1300)
basis/compiler/tests/redefine3.factor
core/generic/generic-tests.factor

index 913111b8ea34586a677bbe908770eb23e0826608..93b1e6fa92258d21bdb4c2a191a14e61c92e958a 100644 (file)
@@ -14,7 +14,7 @@ M: empty-mixin sheeple drop "wake up" ; inline
 : sheeple-test ( -- string ) { } sheeple ;
 
 : compiled-use? ( key word -- ? )
-    "compiled-uses" word-prop 2 <groups> key? ;
+    "definition-dependencies" word-prop member-eq? ;
 
 [ "sheeple" ] [ sheeple-test ] unit-test
 [ t ] [ \ sheeple-test optimized? ] unit-test
index 5a98173a89fc43858b171a7627794c8757725098..ff38ee39ea5d61d14835d1a773651a509d720b90 100644 (file)
@@ -207,8 +207,7 @@ M: integer forget-test 3 + ;
 [ ] [ "IN: generic.tests USE: math FORGET: M\\ integer forget-test" eval( -- ) ] unit-test
 
 [ { } ] [
-    \ + compiled-usage keys
-    [ method-body? ] filter
+    \ + effect-dependencies-of keys [ method-body? ] filter
     [ "method-generic" word-prop \ forget-test eq? ] filter
 ] unit-test