diff options
| author | dos-reis <gdr@axiomatics.org> | 2012-06-10 02:37:59 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2012-06-10 02:37:59 +0000 |
| commit | 6a5c8a141d2d0a980d59531d090811c16afa3704 (patch) | |
| tree | 1f19bf32834636beb56dafa2df93b506d33d772c /src | |
| parent | a016645fb84079852fb1464d770252af687d57f5 (diff) | |
| download | open-axiom-6a5c8a141d2d0a980d59531d090811c16afa3704.tar.gz | |
* interp/spad-parser.boot: Fix thinkos from previous commit.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 4 | ||||
| -rw-r--r-- | src/interp/spad-parser.boot | 14 |
2 files changed, 18 insertions, 0 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index c0621c85..db2f6124 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,5 +1,9 @@ 2012-06-09 Gabriel Dos Reis <gdr@cs.tamu.edu> + * interp/spad-parser.boot: Fix thinkos from previous commit. + +2012-06-09 Gabriel Dos Reis <gdr@cs.tamu.edu> + * interp/preparse.lisp: Remove. * interp/spad-parser.boot: Do not include. Import lexing instead. * interp/Makefile.in: Adjust. diff --git a/src/interp/spad-parser.boot b/src/interp/spad-parser.boot index 0363ff97..f4f50db6 100644 --- a/src/interp/spad-parser.boot +++ b/src/interp/spad-parser.boot @@ -51,6 +51,20 @@ module spad_-parser where --% +$SKIPME := false +TOK := nil +DEFINITION__NAME := nil +$preparseLastLine := nil +$preparseReportIfTrue := false + +--% + +INITIALIZE_-PREPARSE rd == + readerLineNumber(rd) := 0 + $preparseLastLine := readLine readerInput rd + +--% + addClose(line,ch) == line.(maxIndex line) = char ";" => ch = char ";" => line |