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