4 (/ (- (+ 5 (* 2 3)) 3) 4)
22 ;; Verifying symbols are case-sensitive
32 ;; Check env lookup non-fatal error
34 ; .*\'abc\' not found.*
35 ;; Check that error aborts def!
48 (let* (z (+ 2 3)) (+ 1 z))
50 (let* (p (+ 2 3) q (+ 2 p)) (+ p q))
52 (def! y (let* (z 7) z))
56 ;; Testing outer environment
63 (let* (z 2) (let* (q 9) a))
65 (let* (x 4) (def! a 5))
73 ;; -------- Deferrable/Optional Functionality --------
75 ;; Testing let* with vector bindings
78 (let* [p (+ 2 3) q (+ 2 p)] (+ p q))
81 ;; Testing vector evaluation
82 (let* (a 5 b 6) [3 4 a [b 7] 8])