core/generic/parser/parser-tests.factor

   1 USING: generic.parser tools.test ;
   2
   3 IN: generic.parser.tests
   4
   5 [ t ] [ ( -- ) ( -- ) method-effect= ] unit-test
   6 [ t ] [ ( a -- b ) ( x -- y ) method-effect= ] unit-test
   7 [ f ] [ ( a b -- c ) ( x -- y ) method-effect= ] unit-test
   8 [ f ] [ ( a -- b ) ( x y -- z ) method-effect= ] unit-test
   9
  10 [ t ] [ ( -- * ) ( -- ) method-effect= ] unit-test
  11 [ f ] [ ( -- * ) ( x -- y ) method-effect= ] unit-test
  12 [ t ] [ ( x -- * ) ( x -- y ) method-effect= ] unit-test
  13 [ t ] [ ( x -- * ) ( x -- y z ) method-effect= ] unit-test