Add MLKPrintToString along with a couple of fixnum handling functions.

1 files changed, 4 insertions, 4 deletions

diff --git a/MLKCons.m b/MLKCons.m
index d7063dc..469275b 100644
--- a/MLKCons.m
+++ b/MLKCons.m
@@ -102,15 +102,15 @@
 {
   if (!_cdr)
     return [NSString stringWithFormat:@"%@",
-                     (_car ? (id)[_car descriptionForLisp] : (id)@"()")];
+                     MLKPrintToString(_car)];
   else if ([_cdr isKindOfClass:[MLKCons class]])
     return [NSString stringWithFormat:@"%@ %@",
-                     (_car ? (id)[_car descriptionForLisp] : (id)@"()"),
+                     MLKPrintToString(_car),
                      [_cdr bareDescriptionForLisp]];
   else
     return [NSString stringWithFormat:@"%@ . %@",
-                     (_car ? (id)[_car descriptionForLisp] : (id)@"()"),
-                     [_cdr descriptionForLisp]];
+                     MLKPrintToString(_car),
+                     MLKPrintToString(_cdr)];
 }
 
 -(NSString *)descriptionForLisp