From 0a0bd4aacab28c08c92cf652812ba9336a232871 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Thu, 1 Nov 2007 17:23:35 +0000
Subject: 2007-11-01  Gabriel Dos Reis  <gdr@cs.tamu.edu> 	    Waldek
 Hebisch <hebisch@math.uni.wroc.pl>

	* int-top.boot (ncParseFromString): Fix thinko.
---
 src/interp/ChangeLog    | 5 +++++
 src/interp/int-top.boot | 2 +-
 2 files changed, 6 insertions(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/interp/ChangeLog b/src/interp/ChangeLog
index f81e7cce..bc1dc193 100644
--- a/src/interp/ChangeLog
+++ b/src/interp/ChangeLog
@@ -1,3 +1,8 @@
+2007-11-01  Gabriel Dos Reis  <gdr@cs.tamu.edu>
+	    Waldek Hebisch <hebisch@math.uni.wroc.pl>
+
+	* int-top.boot (ncParseFromString): Fix thinko.
+
 2007-11-01  Gabriel Dos Reis  <gdr@cs.tamu.edu>
 
 	* Makefile.pamphlet (compat.$(FASLEXT)): New rule.
diff --git a/src/interp/int-top.boot b/src/interp/int-top.boot
index 9d444b3f..1a512d48 100644
--- a/src/interp/int-top.boot
+++ b/src/interp/int-top.boot
@@ -38,7 +38,7 @@ ncParseAndInterpretString s ==
   processInteractive(packageTran parseFromString s, nil)
 
 ncParseFromString s ==
-  zeroOneTran packageTran CATCH("SPAD_READER", parseFromString s)
+  zeroOneTran packageTran CATCH("SPAD__READER", parseFromString s)
 
 ncINTERPFILE(file, echo) ==
   savedEcho := $EchoLines
-- 
cgit v1.2.3