summaryrefslogtreecommitdiff
path: root/MLKReader.m
diff options
context:
space:
mode:
Diffstat (limited to 'MLKReader.m')
-rw-r--r--MLKReader.m10
1 files changed, 2 insertions, 8 deletions
diff --git a/MLKReader.m b/MLKReader.m
index a6f11c1..abd8a43 100644
--- a/MLKReader.m
+++ b/MLKReader.m
@@ -522,20 +522,14 @@ readingUninternedSymbol:(BOOL)readingUninternedSymbol
else
symbol = [MLKSymbol symbolWithName:symbolName package:nil];
- if (packageMarker == 0)
- {
- // Make keyword symbols self-evaluate.
- [[MLKDynamicContext globalContext] addValue:symbol forSymbol:symbol];
- }
-
return symbol;
}
}
+(id) readFromString:(NSString *)string
{
- return [self readFromStream:[[MLKStringInputStream alloc]
- initWithString:string]
+ return [self readFromStream:AUTORELEASE([[MLKStringInputStream alloc]
+ initWithString:string])
eofError:YES
eofValue:nil
recursive:NO