author | Claus Gittinger <cg@exept.de> |
Mon, 02 May 2016 17:16:03 +0200 | |
changeset 1413 | c9ef56f181ff |
parent 1158 | 9b747d4542a8 |
child 1447 | 2351db93aa5b |
child 1499 | 26a16a04219b |
permissions | -rw-r--r-- |
"{ Package: 'exept:regression' }" "{ NameSpace: RegressionTests }" TestCase subclass:#GCTest instanceVariableNames:'' classVariableNames:'' poolDictionaries:'' category:'tests-Regression-RuntimeSystem' ! !GCTest methodsFor:'tests'! testRemSetOverflow1 |arr| arr := Array new:100000. 100 timesRepeat:[ 1 to:100000 do:[:i | arr at:i put:(Array new:1). ]. ]. " self new testRemSetOverflow1 " ! ! !GCTest class methodsFor:'documentation'! version ^ '$Header$' ! !