diff --git a/tests/let-syntax.scm b/tests/let-syntax.scm
index f7fb514a..59176853 100644
--- a/tests/let-syntax.scm
+++ b/tests/let-syntax.scm
@@ -1,5 +1,8 @@
 (import (scheme base) (scheme write) (scheme cyclone pretty-print))
 
+(write 
+ ((lambda (x) x) 1))
+
 (write
 (let ((x 'outer))
   (let-syntax ((m (syntax-rules () ((m) x))))