basis/xmode/rules/rules-tests.factor

   1 USING: xmode.rules tools.test ;
   2
   3 { { 1 2 3 } } [ f { 1 2 3 } ?push-all ] unit-test
   4 { { 1 2 3 } } [ { 1 2 3 } f ?push-all ] unit-test
   5 { V{ 1 2 3 4 5 } } [ { 1 2 3 } { 4 5 } ?push-all ] unit-test