X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=tests%2Fbugs%2Fbig-input-2.sh;h=5a3c6da02dff2a633dbb1d3822e9ebdb8d24f09f;hb=c434e369b6695f8135a2914e9a425edcdd09ef35;hp=0fea4abab773478415d6dbd94b36b84bb3e10981;hpb=7f3ac8559f71179a95fad28a30882ca476d8ac99;p=pspp diff --git a/tests/bugs/big-input-2.sh b/tests/bugs/big-input-2.sh index 0fea4abab7..5a3c6da02d 100755 --- a/tests/bugs/big-input-2.sh +++ b/tests/bugs/big-input-2.sh @@ -19,6 +19,7 @@ export STAT_CONFIG_PATH cleanup() { + cd / rm -rf $TEMPDIR } @@ -56,16 +57,10 @@ if [ $? -ne 0 ] ; then no_result ; fi printf "Creating input data. Please wait" activity="create data" -( while true ; do - echo AB12; -done ) | head -100000 >> $TEMPDIR/large.dat +$PERL -e 'print "AB12\n" foreach 1...100000; + print "AB04\n" foreach 1...100000;' > $TEMPDIR/large.dat if [ $? -ne 0 ] ; then no_result ; fi -printf '.' -( while true ; do - echo AB04; -done ) | head -100000 >> $TEMPDIR/large.dat -if [ $? -ne 0 ] ; then no_result ; fi -printf "\n"; +printf ".\n"; activity="create program" cat > $TESTFILE <> $TEMPDIR/large.dat +$PERL -e 'print "AB04\nAB12\n" foreach 1...25000' >> $TEMPDIR/large.dat if [ $? -ne 0 ] ; then no_result ; fi activity="run program"