diff --git a/tests/let-syntax.scm b/tests/let-syntax.scm
index 280d7a15..e85d0df6 100644
--- a/tests/let-syntax.scm
+++ b/tests/let-syntax.scm
@@ -1,4 +1,14 @@
-(import (scheme base) (scheme write))
+(import (scheme base) (scheme write) (scheme cyclone pretty-print))
+
+#;(letrec-syntax
+  ((my-or (syntax-rules
+            ()
+            ((my-or) #f)
+            ((my-or e) e)
+            ((my-or e1 e2 ...)
+             (let ((temp e1)) (if temp temp (my-or e2 ...)))))))
+  (let ((x #f) (y 7) (temp 8) (let odd?) (if even?))
+    (my-or x (let temp) (if y) y))) ;; ==> 7
 
 (define-syntax my-let
   (syntax-rules