bldc/tests/test_read_program_1.lisp

4 lines
64 B
Common Lisp

(check (= 1 (eval-program (read-program "(+ 1 2) (- 3 2)"))))