extra/peg/expr/expr-tests.factor

   1 ! Copyright (C) 2007 Chris Double.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 !
   4 USING: kernel tools.test peg peg.expr multiline sequences ;
   5 IN: peg.expr.tests
   6
   7 { 5 } [
   8   "2+3" expr
   9 ] unit-test
  10
  11 { 6 } [
  12   "2*3" expr
  13 ] unit-test
  14
  15 { 14 } [
  16   "2+3*4" expr
  17 ] unit-test
  18
  19 { 17 } [
  20   "2+3*4+3" expr
  21 ] unit-test
  22
  23 { 23 } [
  24   "2+3*(4+3)" expr
  25 ] unit-test