The Trunk: KernelTests-ar.119.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: KernelTests-ar.119.mcz

commits-2
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 ]!