On 07/26/2011 12:58 AM, Gwenael Casaccio wrote:
Hi,

I've investigate a bit the long recursion bug, to debug I've choose a
simple recursive code:

ObjectMemory growTo: 100 * 1024 * 1024. " This is not needed "
Object compile: 'foo: i [ i > 1 ifTrue: [ self foo: i - 1 ] ifFalse: [
#ici printNl ] ]'.
Object new foo: 1000000

3.2 works:

st> Object compile: 'foo: i [ i > 1 ifTrue: [ self foo: i - 1 ] ifFalse: [ #ici printNl ] ]'.
Object>>foo:
st> Object new foo: 1000000
"Global garbage collection... done, heap grown"
"Global garbage collection... done, heap grown"
...
"Global garbage collection... done, heap grown"
"Global garbage collection... done, heap grown"
#ici
an Object
st> Object new foo: 10000000
"Global garbage collection... done, heap compacted"
"Global garbage collection... done, heap grown"
"Global garbage collection... done, heap grown"
...
"Global garbage collection... done, heap grown"
"Global garbage collection... done, heap grown"
gst: out of memory allocating 262144 bytes


Paolo

_______________________________________________
help-smalltalk mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/help-smalltalk

Reply via email to