diff options
author | Matthias Andreas Benkard <matthias@benkard.de> | 2008-07-06 15:09:24 +0200 |
---|---|---|
committer | Matthias Andreas Benkard <matthias@benkard.de> | 2008-07-06 15:09:24 +0200 |
commit | b0c7bc77dd6bf878fbbdd76c11e3a73cf7049c12 (patch) | |
tree | 269197d6806c395338b00050d03d58fa59204ca3 /MLKDynamicContext.m | |
parent | c60c37073ee1a34fe40cc26723c06b779fbdf932 (diff) |
Reader: Support comments introduced by semicolons.
Diffstat (limited to 'MLKDynamicContext.m')
-rw-r--r-- | MLKDynamicContext.m | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/MLKDynamicContext.m b/MLKDynamicContext.m index 2be64e3..a6ffcca 100644 --- a/MLKDynamicContext.m +++ b/MLKDynamicContext.m @@ -33,6 +33,7 @@ #import "MLKQuoteReader.h" #import "MLKReadtable.h" #import "MLKStringReader.h" +#import "MLKSemicolonReader.h" #import "MLKSymbol.h" #import "MLKInteger.h" #import "runtime-compatibility.h" @@ -145,7 +146,6 @@ static MLKDynamicContext *global_context; [readtable setSyntaxType:MULTI_ESCAPE forCharacter:'|']; - // [readtable setSyntaxType:TERMINATING_MACRO forCharacter:';']; // [readtable setSyntaxType:NONTERMINATING_MACRO forCharacter:'#']; // [readtable setSyntaxType:TERMINATING_MACRO forCharacter:'`']; // [readtable setSyntaxType:TERMINATING_MACRO forCharacter:',']; @@ -165,6 +165,10 @@ static MLKDynamicContext *global_context; [readtable setMacroFunction:AUTORELEASE([[MLKQuoteReader alloc] init]) forCharacter:'\'']; + [readtable setSyntaxType:TERMINATING_MACRO forCharacter:';']; + [readtable setMacroFunction:AUTORELEASE([[MLKSemicolonReader alloc] init]) + forCharacter:';']; + for (ch = '0'; ch <= '9'; ch++) { [readtable setSyntaxType:CONSTITUENT forCharacter:ch]; |