--- 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