aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/interp/ChangeLog5
-rw-r--r--src/interp/i-syscmd.boot.pamphlet2
2 files changed, 6 insertions, 1 deletions
diff --git a/src/interp/ChangeLog b/src/interp/ChangeLog
index 1ea593d5..07a1eb5e 100644
--- a/src/interp/ChangeLog
+++ b/src/interp/ChangeLog
@@ -1,5 +1,10 @@
2007-08-19 Gabriel Dos Reis <gdr@cs.tamu.edu>
+ * i-syscmd.boot.pamphlet (SPADRWRITE): Don't confuse Boot comments
+ with Lisp comments.
+
+2007-08-19 Gabriel Dos Reis <gdr@cs.tamu.edu>
+
* bootfuns.lisp.pamphlet (def-boot-fun): Remove.
(|initializeSetVariables|): Likewise.
(|updateSourceFiles|): Likewise.
diff --git a/src/interp/i-syscmd.boot.pamphlet b/src/interp/i-syscmd.boot.pamphlet
index e846b570..9a80eb4a 100644
--- a/src/interp/i-syscmd.boot.pamphlet
+++ b/src/interp/i-syscmd.boot.pamphlet
@@ -1874,7 +1874,7 @@ SPADRREAD(vec, stream) ==
SPADRWRITE(vec, item, stream) ==
val := SPADRWRITE0(vec, item, stream)
val = 'writifyFailed =>
- throwKeyedMsg("S2IH0036", nil) ; cannot save value to file
+ throwKeyedMsg("S2IH0036", nil) -- cannot save value to file
item
SPADRWRITE0(vec, item, stream) ==