Eliot Miranda uploaded a new version of KernelTests to project The Trunk:
http://source.squeak.org/trunk/KernelTests-eem.320.mcz==================== Summary ====================
Name: KernelTests-eem.320
Author: eem
Time: 17 March 2017, 8:21:49.646095 am
UUID: 27f624c0-589a-4ec0-8cce-717e6c31ceb2
Ancestors: KernelTests-eem.319
And nuke my dumb comment.
=============== Diff against KernelTests-eem.319 ===============
Item was changed:
----- Method: AllocationTest>>testOutOfMemorySignal (in category 'tests') -----
testOutOfMemorySignal
"Ensure that OutOfMemory is signaled eventually"
| sz |
self setFreeSpaceLimitOf: 1024 * 1024 * 1024 * (Smalltalk wordSize = 8
ifTrue: [4]
ifFalse: [1.5])
around:
[sz := 512*1024*1024. "work around the 1GB alloc bug"
self should: [(1 to: 2000) collect: [:i| Array new: sz]] raise: OutOfMemory].
+ "Call me when this test fails, I want your machine."
- "Call me when this test fails, I want your machine" "I think they mean succeeds ;-) eem"
"Current (2017) Spur VMs fail new: & basicNew: with #'bad argument' if given other than a non-negative SmallInteger."
sz := 1024*1024*1024*1024.
self should: [Array new: sz]
raise: OutOfMemory, Error
withExceptionDo:
[:ex|
ex class == Error ifTrue:
[self assert: [ex messageText includesSubString: 'basicNew: with invalid argument']]]!