develooper Front page | perl.perl5.porters | Postings from February 2003

Re: Test::Harness & _print_ml()

Thread Previous | Thread Next
From:
schwern
Date:
February 9, 2003 04:40
Subject:
Re: Test::Harness & _print_ml()
Message ID:
20030208154110.A16322@ttul.org
On Sun, Feb 09, 2003 at 12:15:55AM +0100, Abigail wrote:
> Test::Harness has the habit to print a string to the screen for
> each test you run - the _print_ml("ok $curr/$max") line in the
> anon sub assigned to $Handlers{test}. It's this line that's
> responsible for the 'nnn/NNN' counter to show.
> 
> It doesn't seem a lot, but it does add up if you have 180k+ tests.
> 
> The test suite for Regexp::Common 2.107 takes about 155 wallclock
> seconds to run on my computer. If I outcomment the call to _print_ml, 
> the time to run drops to about 125 seconds, which isn't insignificant.
> 
> Can we have a way to disable this progress report, short of modifying
> the code?

Yes, but since its not urgant I'd rather it wait until we pull the display 
code out into a separate, pluggable object like the parser has (mostly) 
been rather than hacking in another global or environment variable.

Before that happens the scary formatting code has to be fathomed.

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About