Commit d67755cd authored by Pierre-Antoine Rouby's avatar Pierre-Antoine Rouby 🤘🏻
Browse files

test: Add let tests.

parent 6a815c31
......@@ -85,3 +85,15 @@
(test "(cons* 1 2 3 [4 5])"
(= [1 2 3 4 5] (cons* 1 2 3 [4 5])))
;;;
;;; Let.
;;;
(test "(let foo 42 ...)"
(= 42 (let foo 42 foo)))
(test "(let foo 22 (let bar 20 (+ foo bar)))"
(= 42 (let foo 22
(let bar 20
(+ foo bar)))))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment