RegressionTests__MemoryTest.st
branchjv
changeset 1500 d406a10b2965
parent 1499 26a16a04219b
parent 1447 2351db93aa5b
--- a/RegressionTests__MemoryTest.st	Wed Jun 29 21:40:53 2016 +0100
+++ b/RegressionTests__MemoryTest.st	Thu Jun 30 09:02:08 2016 +0100
@@ -16,7 +16,7 @@
     documentation to be added.
 
     [author:]
-        Michael Beyl (mb@bart)
+	Michael Beyl (mb@bart)
 
     [instance variables:]
 
@@ -34,8 +34,8 @@
 !MemoryTest methodsFor:'tests'!
 
 test1
-    "cg: whoever wrote this test: 
-         please add some comment on what is actually tested"
+    "cg: whoever wrote this test:
+	 please add some comment on what is actually tested"
 
     |x y z|
     1 to: 100 do: [:rep|
@@ -49,14 +49,14 @@
      y attributes: (Array with: (XML::Attribute name: 'a' value: '1')
       with: (XML::Attribute name: 'a' value: '1')).
       1 to: 1000 do: [:j |
-        y addNode: (z := XML::Element tag: 'y').
+	y addNode: (z := XML::Element tag: 'y').
      z attributes: (Array with: (XML::Attribute name: 'a' value: '1')
       with: (XML::Attribute name: 'a' value: '1')).]].
     ObjectMemory garbageCollect.
     x nodesDo: [:el |
      (el isKindOf: XML::Element)
        ifTrue: [(el attributeNamed:'a')
-        value: ((el valueOfAttribute:'a' ifAbsent:[]) asNumber * 10 / 3 ) asString]
+	value: ((el valueOfAttribute:'a' ifAbsent:[]) asNumber * 10 / 3 ) asString]
     ].
     ]