26 lines
379 B
Factor
26 lines
379 B
Factor
|
! Copyright (C) 2007 Chris Double.
|
||
|
|
! See http://factorcode.org/license.txt for BSD license.
|
||
|
|
!
|
||
|
|
USING: kernel tools.test peg.expr multiline sequences ;
|
||
|
|
IN: temporary
|
||
|
|
|
||
|
|
{ 5 } [
|
||
|
|
"2+3" eval-expr
|
||
|
|
] unit-test
|
||
|
|
|
||
|
|
{ 6 } [
|
||
|
|
"2*3" eval-expr
|
||
|
|
] unit-test
|
||
|
|
|
||
|
|
{ 14 } [
|
||
|
|
"2+3*4" eval-expr
|
||
|
|
] unit-test
|
||
|
|
|
||
|
|
{ 17 } [
|
||
|
|
"2+3*4+3" eval-expr
|
||
|
|
] unit-test
|
||
|
|
|
||
|
|
{ 23 } [
|
||
|
|
"2+3*(4+3)" eval-expr
|
||
|
|
] unit-test
|