(show-time
(lambda ()
(compile-cref compile-dir)
- (for-each compile-dir '("runtime" "star-parser" "sf"))))
+ (for-each compile-dir (quote ("runtime" "star-parser" "sf")))))
(newline))
EOF
# Syntax the new compiler in fresh (compiler) packages. Use the new sf too.
run_cmd ./microcode/scheme --batch-mode --library lib --band runtime.com <<EOF
(begin
- (load-option 'SF)
+ (load-option (quote SF))
(with-working-directory-pathname "compiler/"
(lambda ()
(show-time
run_cmd ./microcode/scheme --batch-mode --library lib --band runtime.com <<EOF
(begin
- (load-option 'COMPILER)
+ (load-option (quote COMPILER))
(load "etc/compile.scm")
(show-time
(lambda ()