~ chicken-core (chicken-5) 3cdcf14971a9f92a03f8c8787d0640c64d0199ec
commit 3cdcf14971a9f92a03f8c8787d0640c64d0199ec
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Thu Jul 29 08:37:38 2010 +0200
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Thu Jul 29 08:37:38 2010 +0200
trivial changes
diff --git a/batch-driver.scm b/batch-driver.scm
index 7eaf6961..a19bffd7 100644
--- a/batch-driver.scm
+++ b/batch-driver.scm
@@ -364,7 +364,9 @@
(newline) )
((not filename)
(print-version #t)
- (display "\nEnter \"chicken -help\" for information on how to use it.\n") )
+ (display "\nEnter `chicken -help' for information on how to use the compiler,\n")
+ (display "or try `csc' for a more convenient interface.\n")
+ (display "\nRun `csi' to start the interactive interpreter.\n"))
(else
;; Display header:
diff --git a/scheduler.scm b/scheduler.scm
index 240b3ce1..c0ab3b14 100644
--- a/scheduler.scm
+++ b/scheduler.scm
@@ -312,7 +312,7 @@ EOF
(let ([o (open-output-string)])
(display "Warning (" o)
(display ct o)
- (display "): " o)
+ (display ")" o)
(print-error-message arg ##sys#standard-error (get-output-string o))
(print-call-chain ##sys#standard-error 0 ct) ) ] )
(##sys#setslot ct 7 arg)
Trap