diff options
author | Matthias Andreas Benkard <matthias@benkard.de> | 2008-06-17 16:11:43 +0200 |
---|---|---|
committer | Matthias Andreas Benkard <matthias@benkard.de> | 2008-06-17 16:11:43 +0200 |
commit | d6d73cfbcfd4eae88e53c4c30e221a66daade5e1 (patch) | |
tree | 844f1974e5d2fe9e5859ea6e7ddf6e506fc64e54 /MLKSymbol.m | |
parent | 1cf2f94d79396d81bdc798768687c1bef86a9102 (diff) |
MLKCons, MLKSymbol: Override -descriptionForLisp.
Diffstat (limited to 'MLKSymbol.m')
-rw-r--r-- | MLKSymbol.m | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/MLKSymbol.m b/MLKSymbol.m index 3443e37..42a7141 100644 --- a/MLKSymbol.m +++ b/MLKSymbol.m @@ -18,6 +18,8 @@ #import "MLKSymbol.h" +#import <Foundation/NSString.h> + @implementation MLKSymbol -(MLKSymbol *) initWithName:(id)aName package:(id)aPackage @@ -43,6 +45,12 @@ ASSIGN (homePackage, aPackage); } +-(NSString *)descriptionForLisp +{ + // FIXME: This is wrong in more than one way. + return [NSString stringWithFormat:@"|%@|", name]; +} + -(void) dealloc { RELEASE (name); |