LowSpaceWatcher not working for atomary too large allocation

[LinqLover]

STR:

ulimit -v $((200*1024))
squeak trunk.image

Array new: 200*1024*1024

(by the way, OutOfMemory needs to be patched, not yet committed:

defaultAction
	LowSpaceWatcher signalLowSpace.

)

This gives an infinity loop because LowSpaceWatcher>>notifyMemoryHogs always answers true. This is because without our large allocation has failed, the watcher thinks we have plenty of free memory available, so the user is not notified. And Behavior>>#handleFailingFailingBasicNew: assumes that OutOfMemory will only be resumed after an interaction by the user.

So, how can we fix that? Should we teach the low space watcher about the newly requested amount of memory so it can subtract them from Smalltalk bytesLeft? Or do we need some other kind of recursion prevention?

[LinqLover]

Handling of a infinite recursion also works semi-good:

Object>>foo
	^ self foo

Depending on how fast I interrupt, I either see no space watcher warnings, 3-4 warnings at once, or I cannot interrupt the image any more.