From 7bb62035f03da386db26668b1aff93fac04d3a32 Mon Sep 17 00:00:00 2001 From: Matthias Andreas Benkard Date: Thu, 3 Jul 2008 18:34:39 +0200 Subject: Reader: Add support for quoting. --- MLKDynamicContext.m | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'MLKDynamicContext.m') diff --git a/MLKDynamicContext.m b/MLKDynamicContext.m index 4261da3..2be64e3 100644 --- a/MLKDynamicContext.m +++ b/MLKDynamicContext.m @@ -30,6 +30,7 @@ #import "MLKLinkedList.h" #import "MLKPackage.h" #import "MLKParenReader.h" +#import "MLKQuoteReader.h" #import "MLKReadtable.h" #import "MLKStringReader.h" #import "MLKSymbol.h" @@ -146,7 +147,6 @@ static MLKDynamicContext *global_context; // [readtable setSyntaxType:TERMINATING_MACRO forCharacter:';']; // [readtable setSyntaxType:NONTERMINATING_MACRO forCharacter:'#']; - // [readtable setSyntaxType:TERMINATING_MACRO forCharacter:'\'']; // [readtable setSyntaxType:TERMINATING_MACRO forCharacter:'`']; // [readtable setSyntaxType:TERMINATING_MACRO forCharacter:',']; @@ -161,6 +161,10 @@ static MLKDynamicContext *global_context; [readtable setMacroFunction:AUTORELEASE([[MLKStringReader alloc] init]) forCharacter:'"']; + [readtable setSyntaxType:TERMINATING_MACRO forCharacter:'\'']; + [readtable setMacroFunction:AUTORELEASE([[MLKQuoteReader alloc] init]) + forCharacter:'\'']; + for (ch = '0'; ch <= '9'; ch++) { [readtable setSyntaxType:CONSTITUENT forCharacter:ch]; -- cgit v1.2.3