diff options
Diffstat (limited to 'MLKPackage.m')
| -rw-r--r-- | MLKPackage.m | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/MLKPackage.m b/MLKPackage.m index bd19608..445bf86 100644 --- a/MLKPackage.m +++ b/MLKPackage.m @@ -268,9 +268,9 @@ static NSMutableDictionary *packages = nil; [NSException raise:@"MLKSymbolConflictError" format:@"Imported symbol %@ conflicts with accessible symbol %@ in package %@.", - [symbol descriptionForLisp], - [old_symbol descriptionForLisp], - [self descriptionForLisp]]; + MLKPrintToString(symbol), + MLKPrintToString(old_symbol), + MLKPrintToString(self)]; } [_accessible_symbols setObject:symbol forKey:name]; @@ -304,9 +304,9 @@ static NSMutableDictionary *packages = nil; [NSException raise:@"MLKSymbolConflictError" format:@"Inherited symbol %@ conflicts with accessible symbol %@ in package %@.", - [symbol descriptionForLisp], - [old_symbol descriptionForLisp], - [self descriptionForLisp]]; + MLKPrintToString(symbol), + MLKPrintToString(old_symbol), + MLKPrintToString(self)]; [_accessible_symbols setObject:symbol forKey:name]; @@ -352,9 +352,9 @@ static NSMutableDictionary *packages = nil; [NSException raise:@"MLKSymbolConflictError" format:@"Exported symbol %@ conflicts with accessible symbol %@ in package %@.", - [symbol descriptionForLisp], - [old_symbol descriptionForLisp], - [package descriptionForLisp]]; + MLKPrintToString(symbol), + MLKPrintToString(old_symbol), + MLKPrintToString(package)]; } for (i = 0; i < [_using_packages count]; i++) @@ -475,7 +475,7 @@ static NSMutableDictionary *packages = nil; -(NSString *) descriptionForLisp { - return [NSString stringWithFormat:@"#<Package %@>", [[self name] descriptionForLisp]]; + return [NSString stringWithFormat:@"#<Package %@>", MLKPrintToString ([self name])]; } -(void) dealloc |