test recursive definitions in let*

Detected while attempting to rewrite let* with fn*.

diff --git a/tests/step4_if_fn_do.mal b/tests/step4_if_fn_do.mal
index 4507cfb..ef79805 100644 (file)
--- a/tests/step4_if_fn_do.mal
+++ b/tests/step4_if_fn_do.mal
@@ -200,6 +200,11 @@ a
 ;;;;=>89
 
 
+;; Testing recursive function in environment.
+(let* [cst (fn* [n] (if (= n 0) nil (cst (- n 1))))] (cst 1))
+;=>nil
+
+
 ;>>> deferrable=True
 ;;
 ;; -------- Deferrable Functionality --------