Andreas Raab uploaded a new version of KernelTests to project The Trunk:
http://source.squeak.org/trunk/KernelTests-ar.119.mcz==================== Summary ====================
Name: KernelTests-ar.119
Author: ar
Time: 15 December 2009, 3:44:18 am
UUID: 1a418f2f-3734-bb4b-b04f-8c4b6c63ddcc
Ancestors: KernelTests-ul.118
Fix out of memory test and document one gig alloc failure.
=============== Diff against KernelTests-ul.118 ===============
Item was changed:
----- Method: AllocationTest>>testOutOfMemorySignal (in category 'tests') -----
testOutOfMemorySignal
"Ensure that OOM is signaled eventually"
| sz |
SmalltalkImage current platformName = 'unix' ifTrue: [ "avoid crashing"
^self assert: false ].
sz := 512*1024*1024. "work around the 1GB alloc bug"
+ self should:[(1 to: 2000) collect:[Array new: sz]] raise: OutOfMemory.
- self should:[2000 timesRepeat:[Array new: sz]] raise: OutOfMemory.
"Call me when this test fails, I want your machine"
sz := 1024*1024*1024*1024.
self should:[Array new: sz] raise: OutOfMemory.
!
Item was changed:
----- Method: AllocationTest>>expectedFailures (in category 'tests') -----
expectedFailures
+ "the one gig allocation fails everywhere, out of memory crashes unix vm"
-
SmalltalkImage current platformName = 'unix'
+ ifTrue: [ ^#(testOneGigAllocation testOutOfMemorySignal) ]
+ ifFalse: [ ^#(testOneGigAllocation) ]!
- ifTrue: [ ^#(testOutOfMemorySignal) ] "avoid crashing"
- ifFalse: [ ^super expectedFailures ]!