diff --git a/print.c b/print.c index 0b66d2d..9a0fed3 100644 --- a/print.c +++ b/print.c @@ -45,9 +45,21 @@ void printValue(object input) else if (input.type == consObject) { printf("("); - printValue(CAR(input)); - printf(" . "); - printValue(CDR(input)); + object *currentCell = &input; + while (TYPE(*currentCell) == consObject) + { + printValue(CAR(*currentCell)); + if (TYPE(CDR(*currentCell)) == consObject) + { + printf(" "); + } + currentCell = &CDR(*currentCell); + } + if (TYPE(*currentCell) != nilObject) + { + printf(" . "); + printValue(*currentCell); + } printf(")"); } }