[openfirmware] r1387 - ofw/tokenizer

[svn at openfirmware.info]

Author: wmb
Date: 2009-10-03 00:00:49 +0200 (Sat, 03 Oct 2009)
New Revision: 1387

Modified:
   ofw/tokenizer/tokenize.fth
Log:
Fixed a compilation error in the tokenizer that was introduced
by an earlier change to string handling in the kernel.



Modified: ofw/tokenizer/tokenize.fth
===================================================================
--- ofw/tokenizer/tokenize.fth	2009-10-02 21:59:51 UTC (rev 1386)
+++ ofw/tokenizer/tokenize.fth	2009-10-02 22:00:49 UTC (rev 1387)
@@ -736,7 +736,7 @@
 
 \ (Implementation word, will not be supported)
 : ,"  \ name"  ( -- )
-   [ tokenizer ]  get-string ( ascii " parse ) [ tokens ] ",
+   [ tokenizer ]  get-escaped-string ( ascii " parse ) [ tokens ] ",
 ;
 
 : "  \ text"  ( -- )  \ Compiling ( -- adr len )  \ Executing