bldc/tests/test_read_program_5.lisp

3 lines
81 B
Common Lisp

(check (let ((r (eval-program (read-program "(+ 50 50)"))))
(= r 100)))