--- a/compiler/PPCMethod.st Thu May 21 15:35:26 2015 +0100
+++ b/compiler/PPCMethod.st Thu May 21 15:49:26 2015 +0100
@@ -70,8 +70,14 @@
add: string
self nl.
- indentation timesRepeat: [ buffer nextPut: Character tab ].
+ ((Smalltalk respondsTo:#isSmalltalkX) and:[ Smalltalk isSmalltalkX ]) ifTrue:[
+ indentation * 4 timesRepeat: [ buffer nextPut: Character space ].
+ ] ifFalse:[
+ indentation timesRepeat: [ buffer nextPut: Character tab ].
+ ].
self addOnLine: string.
+
+ "Modified: / 21-05-2015 / 15:42:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
addOnLine: string