From 6bff44b4266fa689abdaf2af33a99cf7795fb606 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Wed, 9 Nov 2005 20:48:42 +0000
Subject: [PATCH] shortcut to letrec-syntaxes+values

svn: r1263
---
 collects/mzlib/stxparam.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/mzlib/stxparam.ss b/collects/mzlib/stxparam.ss
index 85e895ef0e..ca71c5e121 100644
--- a/collects/mzlib/stxparam.ss
+++ b/collects/mzlib/stxparam.ss
@@ -52,7 +52,7 @@
 		"duplicate binding"
 		stx
 		dup)))
-	   #'(let-syntax ([gen-id (convert-renamer val)] ...)
+	   #'(letrec-syntaxes+values ([(gen-id) (convert-renamer val)] ...) ()
 	       body0 body ...)))]))
 
   ;; ----------------------------------------