~ chicken-core (chicken-5) fd114321aed864408a856a638d1858476fb5779f

commit fd114321aed864408a856a638d1858476fb5779f
Author:     Peter Bex <peter.bex@xs4all.nl>
AuthorDate: Wed Jul 4 11:59:37 2012 +0200
Commit:     Christian Kellermann <ckeen@pestilenz.org>
CommitDate: Wed Jul 4 11:59:37 2012 +0200

    Fix assume macro, found by megane on IRC
    
    We cannot use ##sys#er-transformer here. This could have never worked.
    
    Signed-off-by: Christian Kellermann <ckeen@pestilenz.org>

diff --git a/chicken-syntax.scm b/chicken-syntax.scm
index 968aab25..e9d27551 100644
--- a/chicken-syntax.scm
+++ b/chicken-syntax.scm
@@ -1188,10 +1188,9 @@
 
 (##sys#extend-macro-environment
  'assume '()
- (##sys#er-transformer
-  (syntax-rules ()
-    ((_ ((var type) ...) body ...)
-     (let ((var (##core#the type #t var)) ...) body ...)))))
+ (syntax-rules ()
+   ((_ ((var type) ...) body ...)
+    (let ((var (##core#the type #t var)) ...) body ...))))
 
 (##sys#extend-macro-environment
  'define-specialization '()