diff options
Diffstat (limited to 'src/interp/spad-parser.boot')
-rw-r--r-- | src/interp/spad-parser.boot | 14 |
1 files changed, 14 insertions, 0 deletions
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 |