whoops
svn: r18594 original commit: 52186197c7cb750819507ab89f97e54a142d4743
This commit is contained in:
parent
2e3bc1ec95
commit
07eef38a72
|
@ -14,7 +14,6 @@
|
||||||
(define-syntax (module-begin stx)
|
(define-syntax (module-begin stx)
|
||||||
(syntax-case stx ()
|
(syntax-case stx ()
|
||||||
[(_ id . body)
|
[(_ id . body)
|
||||||
(printf "body: ~s\n" #'body)
|
|
||||||
(let ([preprint? #f]
|
(let ([preprint? #f]
|
||||||
[10pt? #f])
|
[10pt? #f])
|
||||||
(let loop ([stuff #'body])
|
(let loop ([stuff #'body])
|
||||||
|
|
Loading…
Reference in New Issue
Block a user