diff --git a/collects/r5rs/init.ss b/collects/r5rs/init.ss
index bcd703e849..6ecb157a4e 100644
--- a/collects/r5rs/init.ss
+++ b/collects/r5rs/init.ss
@@ -9,8 +9,9 @@
 ;; Printing pairs with curly braces is a bad idea, because
 ;;  syntax errors then use curly braces!
 
-(let-syntax ([out (syntax-rules ()
-                    [(_) (begin
-                           (require "main.ss")
-                           (provide (all-from-out "main.ss")))])])
-  (out))
+(define-syntax out
+  (syntax-rules ()
+    [(_) (begin
+           (require "main.ss")
+           (provide (all-from-out "main.ss")))]))
+(out)