lisp/test-input

   1 (+ 4 5)
   2 (cons 17 42)
   3 (car (cons 17 42))
   4 #t
   5 cons
   6 lambda
   7 (lambda () 42)
   8 ((lambda () 42))
   9 ((lambda (a) (+ 2 a)) 17)
  10 (quote ())
  11 (quote (a b c))
  12 (if #t 17 42)
  13 (if #f 17 42)
  14 (eq? 12 12)
  15 (eq? 12 24)
  16 (eq? (cons 2 3) (cons 2 3))
  17 (eq? (quote foo) (quote foo))
  18 (eq? (quote foo) (quote bar))
  19 (eq? "foo" "foo")
  20 (list? 17)
  21 (list? (cons 17 42))
  22 (list? (cons 17 (quote ())))
  23 (primitive-eval (quote (+ 17 42)))
  24 (define (foo a b) (+ a b)) (foo 17 42)