diff options
author | Matthias Andreas Benkard <matthias@benkard.de> | 2008-06-24 14:30:33 +0200 |
---|---|---|
committer | Matthias Andreas Benkard <matthias@benkard.de> | 2008-06-24 14:30:33 +0200 |
commit | 26fa88efed6adff0ef5c79b918514cd5c704c84a (patch) | |
tree | 23b0c9bcd18f3ebd01e5e44bcb37b463557e294d /MLKEnvironment.m | |
parent | c3d754abd77581ff7bd503fa3d2d254f524a1279 (diff) |
Rename methods: forBinding -> forSymbol
Diffstat (limited to 'MLKEnvironment.m')
-rw-r--r-- | MLKEnvironment.m | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/MLKEnvironment.m b/MLKEnvironment.m index 581c462..73ea749 100644 --- a/MLKEnvironment.m +++ b/MLKEnvironment.m @@ -72,7 +72,7 @@ static id UNBOUND; : (id)set); } --(void) setValue:(id)value forBinding:(MLKSymbol *)symbol; +-(void) setValue:(id)value forSymbol:(MLKSymbol *)symbol; { [self setBinding:(symbol ? (id)symbol : (id)[NSNull null]) to:value @@ -93,13 +93,13 @@ static id UNBOUND; raise]; } --(id) valueForBinding:(MLKSymbol *)symbol +-(id) valueForSymbol:(MLKSymbol *)symbol { - return [self valueForBinding:(symbol ? (id)symbol : (id)[NSNull null]) + return [self valueForSymbol:(symbol ? (id)symbol : (id)[NSNull null]) inEnvironment:self]; } --(id) valueForBinding:(MLKSymbol *)symbol inEnvironment:(MLKEnvironment *)env +-(id) valueForSymbol:(MLKSymbol *)symbol inEnvironment:(MLKEnvironment *)env { id value; if ((value = [_bindings objectForKey:symbol])) @@ -115,7 +115,7 @@ static id UNBOUND; } else if (_parent) - return [_parent valueForBinding:symbol]; + return [_parent valueForSymbol:symbol]; else [[[MLKUndefinedVariableException alloc] initWithEnvironment:env variableName:symbol] @@ -129,23 +129,23 @@ static id UNBOUND; [_bindings addEntriesFromDictionary:bindings]; } --(void) addValue:(id)value forBinding:(MLKSymbol *)symbol; +-(void) addValue:(id)value forSymbol:(MLKSymbol *)symbol; { value = value ? value : (id) [NSNull null]; [_bindings setObject:value forKey:symbol]; } --(void) addBinding:(MLKSymbol *)symbol +-(void) addBindingForSymbol:(MLKSymbol *)symbol { [_bindings setObject:UNBOUND forKey:(symbol ? (id)symbol : (id)[NSNull null])]; } --(MLKEnvironment *) environmentForBinding:(MLKSymbol *)symbol +-(MLKEnvironment *) environmentForSymbol:(MLKSymbol *)symbol { if ([_bindings objectForKey:symbol]) return self; else if (_parent) - return [_parent environmentForBinding:symbol]; + return [_parent environmentForSymbol:symbol]; else return nil; } |