summaryrefslogtreecommitdiff
path: root/MLKParenReader.m
diff options
context:
space:
mode:
Diffstat (limited to 'MLKParenReader.m')
-rw-r--r--MLKParenReader.m2
1 files changed, 1 insertions, 1 deletions
diff --git a/MLKParenReader.m b/MLKParenReader.m
index 0d3fcc7..6bb6ba9 100644
--- a/MLKParenReader.m
+++ b/MLKParenReader.m
@@ -51,7 +51,7 @@ static unichar slurpWhitespaceAndPeek (MLKStream *stream, MLKReadtable *readtabl
stream = [arguments objectAtIndex:0];
ch = [[arguments objectAtIndex:1] unicharValue];
readtable = [[MLKDynamicContext currentContext]
- valueForBinding:[[MLKPackage findPackage:@"COMMON-LISP"]
+ valueForSymbol:[[MLKPackage findPackage:@"COMMON-LISP"]
intern:@"*READTABLE*"]];
cons = nil;
tail = nil;