basis/compiler/tree/combinators/combinators-tests.factor

   1 USING: compiler.tree.combinators tools.test kernel ;
   2 IN: compiler.tree.combinators.tests
   3
   4 { 1 0 } [ [ drop ] each-node ] must-infer-as
   5 { 1 1 } [ [ ] map-nodes ] must-infer-as
   6 { 1 1 } [ [ ] contains-node? ] must-infer-as