Use subset? word

2008-05-01 20:02:45 -05:00 · 2008-05-01 20:02:45 -05:00 · 583d036e8a
parent a1ea2655ed
commit 583d036e8a
1 changed files with 0 additions and 4 deletions
--- a/core/optimizer/def-use/def-use-tests.factor
+++ b/core/optimizer/def-use/def-use-tests.factor
@ -11,10 +11,6 @@ namespaces assocs kernel sequences math tools.test words ;
    dataflow compute-def-use drop compute-dead-literals keys
    [ value-literal ] map ;

-: subset? [ member? ] curry all? ;
-
-: set= 2dup subset? >r swap subset? r> and ;
-
 [ { [ + ] } ] [
    [ [ 1 2 3 ] [ + ] over drop drop ] kill-set
 ] unit-test