~ chicken-core (chicken-5) c7c0bdf8f944b6508b98c2b9c52e3f0e1e023eae


commit c7c0bdf8f944b6508b98c2b9c52e3f0e1e023eae
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Sun Jan 25 21:49:16 2015 +0100
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Sun Jan 25 21:49:16 2015 +0100

    mini-srfi-1: batch-driver.scm

diff --git a/batch-driver.scm b/batch-driver.scm
index f28d0ae1..fe96e5e8 100644
--- a/batch-driver.scm
+++ b/batch-driver.scm
@@ -51,6 +51,7 @@
 	chicken.compiler.c-backend)
 
 (include "tweaks")
+(include "mini-srfi-1.scm")
 
 (define-constant funny-message-timeout 60000)
 
@@ -441,7 +442,7 @@
       (for-each
        (lambda (f) (load (##sys#resolve-include-filename f #f #t))) 
        extends) )
-    (set! ##sys#features (delete #:compiler-extension ##sys#features eq?))
+    (set! ##sys#features (delete #:compiler-extension ##sys#features))
     (set! ##sys#features (cons '#:compiling ##sys#features))
     (set! upap (user-post-analysis-pass))
 
Trap