From adac8d95735aa3dc001658f2438b79d1c38a58d4 Mon Sep 17 00:00:00 2001 From: dos-reis Date: Sun, 20 Mar 2011 07:50:21 +0000 Subject: More cleanups --- src/boot/includer.boot | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/boot') diff --git a/src/boot/includer.boot b/src/boot/includer.boot index 4ea4ef4b..249c045f 100644 --- a/src/boot/includer.boot +++ b/src/boot/includer.boot @@ -79,7 +79,7 @@ shoeNotFound fn == shoeReadLispString(s,n) == l := #s n >= l => nil - READ_-FROM_-STRING strconc ( "(", subString(s,n,l-n) ,")") + readLispFromString strconc ( "(", subString(s,n,l-n) ,")") -- read a line from stream shoeReadLine stream == -- cgit v1.2.3