Changeset 12227 in project for chicken/trunk/batch-driver.scm

Timestamp:

10/21/08 20:42:22 (12 years ago)

Author:

felix winkelmann

Message:

• added helpful script for testing in build dir
• chicken-install checks for TCP timeouts and handles multiple default sources to download from
• alias-global-hook is saved and restored when loading compiler extensions
• making bootstrap automaticaly makes confclean

File:

• chicken/trunk/batch-driver.scm (modified) (1 diff)

chicken/trunk/batch-driver.scm

@@ -299 +299 @@
         (printf "Loading compiler extensions...~%~!")
         (load-verbose #t) )
-      (for-each (lambda (f) (load (##sys#resolve-include-filename f #f #t))) extends) )
+      ;; rebind a-g-h to allow extensions in source files to use private-namespace.scm
+      (fluid-let ((##sys#alias-global-hook ##sys#alias-global-hook))
+        (for-each
+         (lambda (f) (load (##sys#resolve-include-filename f #f #t))) 
+         extends) ) )
     (set! ##sys#features (delete #:compiler-extension ##sys#features eq?))