RegressionTests__VMCrashTests.st
changeset 1248 ab9af85de41a
parent 1193 4fd89b765c87
child 1447 2351db93aa5b
child 1493 8da0d9b56e92
equal deleted inserted replaced
1247:ff9a4f439ff9 1248:ab9af85de41a
    68     [ ObjectMemory newSpaceUsed < newLimit ] whileTrue:[
    68     [ ObjectMemory newSpaceUsed < newLimit ] whileTrue:[
    69         | a |
    69         | a |
    70 
    70 
    71         a := Array new: 100.
    71         a := Array new: 100.
    72     ].
    72     ].
    73     "/ No allocate some really huge object
    73     "/ Now, allocate some really huge object
    74     String new: 300 * 1024 * 1024"300MB"
    74     String new: 300 * 1024 * 1024"300MB"
    75 
    75 
    76     "Created: / 05-09-2014 / 19:44:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    76     "Created: / 05-09-2014 / 19:44:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    77     "Modified: / 16-09-2014 / 18:50:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    77     "Modified: / 16-09-2014 / 18:50:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    78 ! !
    78 ! !