~ chicken-core (chicken-5) 8e7599325b79d3a1708d3b4130e75726b7f3aebb
commit 8e7599325b79d3a1708d3b4130e75726b7f3aebb
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Wed Jun 9 23:56:06 2010 +0200
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Wed Jun 9 23:56:06 2010 +0200
csi didn't skip -no-feature
diff --git a/csi.scm b/csi.scm
index be2490a9..e7ecd5d4 100644
--- a/csi.scm
+++ b/csi.scm
@@ -749,7 +749,7 @@ EOF
"-ss" "-sx" "-s" "-script") )
(define-constant complex-options
- '("-D" "-feature" "-I" "-include-path" "-K" "-keyword-style") )
+ '("-D" "-feature" "-I" "-include-path" "-K" "-keyword-style" "-no-feature") )
(define (run)
(let* ([extraopts (parse-option-string (or (get-environment-variable "CSI_OPTIONS") ""))]
@@ -862,7 +862,7 @@ EOF
(repl)
(##sys#write-char-0 #\newline ##sys#standard-output) ) )
(let* ((arg (car args)))
- (cond ((member arg simple-options) )
+ (cond ((member arg simple-options))
((member arg complex-options)
(set! args (cdr args)) )
((or (string=? "-R" arg) (string=? "-require-extension" arg))
diff --git a/rules.make b/rules.make
index 883a48e4..88a763cf 100644
--- a/rules.make
+++ b/rules.make
@@ -1081,7 +1081,7 @@ boot-chicken:
touchfiles:
ifdef WINDOWS_SHELL
- rem now is this funky or what?
+ rem now is this funky, or what?
for %x in (*.scm) do copy /b %x +,,
else
touch *.scm
Trap