diff options
| author | Matthias Andreas Benkard <matthias@benkard.de> | 2008-07-01 17:08:10 +0200 |
|---|---|---|
| committer | Matthias Andreas Benkard <matthias@benkard.de> | 2008-07-01 17:08:10 +0200 |
| commit | 2ce5b7ded1c689548e9becb6fb39284ea68a1941 (patch) | |
| tree | a872ad94aa2e5b4b83dd862959490e0fa3548b8d /NSString-MLKPrinting.m | |
| parent | 786ddbd4cea2fa9808463a5b2ff23dd40b994846 (diff) | |
Reader: Add support for string literals.
Diffstat (limited to 'NSString-MLKPrinting.m')
| -rw-r--r-- | NSString-MLKPrinting.m | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/NSString-MLKPrinting.m b/NSString-MLKPrinting.m index c8f9f34..0afc52d 100644 --- a/NSString-MLKPrinting.m +++ b/NSString-MLKPrinting.m @@ -23,12 +23,17 @@ -(NSString *)descriptionForLisp { NSMutableString *str = [NSMutableString stringWithString:self]; - + [str replaceOccurrencesOfString:@"\"" withString:@"\\\"" options:NSLiteralSearch range:NSMakeRange(0, [str length])]; - + + [str replaceOccurrencesOfString:@"\\" + withString:@"\\\\" + options:NSLiteralSearch + range:NSMakeRange(0, [str length])]; + return [NSString stringWithFormat:@"\"%@\"", str]; } @end |