From 16e12e0c3d18a3eb41425be40275236c6df37c40 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Fri, 7 Oct 2011 19:48:11 +0000
Subject: 	* interp/lexing.boot: Include sys-macros. 	Add more
 tokenizer functions. 	* interp/fnewmeta.lisp: Use them. 	*
 interp/parsing.lisp: Likewise. 	* interp/bootlex.lisp: Likewise. 
 * interp/spad.lisp: Likewise. 	(NEXT-BOOT-LINE): Remove. 	*
 interp/metalex.lisp: Remove old lexing routines. 	* interp/Makefile.in
 (lexing.$(FASLEXT)): Adjust dependency. 	* boot/tokens.boot: newString
 is no longer builtin library function. 	(shoeDictCons): Use makeString
 not newString. 	* lisp/core.lisp.in (listToString): Fix typo.

---
 src/boot/tokens.boot | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'src/boot')

diff --git a/src/boot/tokens.boot b/src/boot/tokens.boot
index 56e1b051..21f9da32 100644
--- a/src/boot/tokens.boot
+++ b/src/boot/tokens.boot
@@ -152,7 +152,7 @@ shoeDictCons()==
   d :=
     a := newVector 256
     b := newVector 1
-    b.0 := newString 0
+    b.0 := makeString 0
     for i in 0..255 repeat
       a.i := b
     a
@@ -277,7 +277,6 @@ for i in [ _
   ["makeSymbol", "INTERN"] , _
   ["maxIndex", "MAXINDEX"] , _
   ["mkpf",        "MKPF"]  , _
-  ["newString", "MAKE-STRING"], _
   ["newVector", "MAKE-ARRAY"], _
   ["nil"           ,NIL ]  , _
   ["not",         "NOT"]  , _
-- 
cgit v1.2.3