run-tests.sh (no results for tcc this time)

[svn/Cll1h/.git] / demos / performance / print.pl

#!/usr/bin/perl

my $i=0;
for ($i=0;$i<10000000;$i++)
{
 print ("stuff");
}