Here's the changes that accidentally went to trunk first.

svn: r17150

original commit: 75803d488132e6824e27c443370d7ff60eaf4011
This commit is contained in:
Stevie Strickland 2009-12-01 20:39:58 +00:00
commit 83d6ec1fbd

View File

@ -7,8 +7,8 @@
(provide lp-include)
(define-syntax (module stx)
(syntax-case stx ()
[(module name base body ...)
(syntax-case stx (#%module-begin)
[(module name base (#%module-begin body ...))
(begin
#'(begin body ...))]))