summaryrefslogtreecommitdiff
path: root/MLKReader.m
diff options
context:
space:
mode:
authorMatthias Andreas Benkard <matthias@benkard.de>2008-06-24 14:30:33 +0200
committerMatthias Andreas Benkard <matthias@benkard.de>2008-06-24 14:30:33 +0200
commit26fa88efed6adff0ef5c79b918514cd5c704c84a (patch)
tree23b0c9bcd18f3ebd01e5e44bcb37b463557e294d /MLKReader.m
parentc3d754abd77581ff7bd503fa3d2d254f524a1279 (diff)
Rename methods: forBinding -> forSymbol
Diffstat (limited to 'MLKReader.m')
-rw-r--r--MLKReader.m8
1 files changed, 4 insertions, 4 deletions
diff --git a/MLKReader.m b/MLKReader.m
index 68db172..c880a68 100644
--- a/MLKReader.m
+++ b/MLKReader.m
@@ -54,7 +54,7 @@
ever_escaped = NO;
readtable = [[MLKDynamicContext currentContext]
- valueForBinding:[[MLKPackage findPackage:@"COMMON-LISP"]
+ valueForSymbol:[[MLKPackage findPackage:@"COMMON-LISP"]
intern:@"*READTABLE*"]];
start:
@@ -236,7 +236,7 @@
int base;
base = [[[MLKDynamicContext currentContext]
- valueForBinding:[[MLKPackage findPackage:@"COMMON-LISP"]
+ valueForSymbol:[[MLKPackage findPackage:@"COMMON-LISP"]
intern:@"*READ-BASE*"]]
intValue];
@@ -435,7 +435,7 @@
if (packageMarker == -1)
{
package = [[MLKDynamicContext currentContext]
- valueForBinding:[[MLKPackage
+ valueForSymbol:[[MLKPackage
findPackage:@"COMMON-LISP"]
intern:@"*PACKAGE*"]];
symbolName = token;
@@ -475,7 +475,7 @@
if (packageMarker == 0)
{
// Make keyword symbols self-evaluate.
- [[MLKDynamicContext globalContext] addValue:symbol forBinding:symbol];
+ [[MLKDynamicContext globalContext] addValue:symbol forSymbol:symbol];
}
return symbol;