If you have a look at the diff here, you'll see why using the pretty 
printer is such a bad idea:

> Item was changed:
>  ----- Method: BraceNode>>printOn:indent: (in category 'printing') -----
> + printOn: aStream indent: level
> - printOn: aStream indent: level
> -
>       aStream nextPut: ${.
> +     1
> +             to: elements size
> +             do:
> +                     [ : i |
> +                     (elements at: i)
> +                             printOn: aStream
> +                             indent: level.
> +                     i < elements size ifTrue:
> +                             [ aStream
> +                                      nextPutAll: '. ' ;
> +                                      crtab: level ] ].
> -     1 to: elements size do:
> -             [:i | (elements at: i) printOn: aStream indent: level.
> -             i < elements size ifTrue: [aStream nextPutAll: '. ']].
>       aStream nextPut: $}!

Levente