diff options
author | Vishal Bhatia <vishal@deja.com> | 1999-03-02 15:27:25 -0800 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-03-04 05:20:50 +0000 |
commit | a6f4eb0a57a2e0009d1bf64dff4f70a26302e92d (patch) | |
tree | 1a3c8f560b38b01203e3a748a21a26d113e93286 /lib | |
parent | 4d0c1c44b6764966a3c975cf76bf3a3a7e41f6bd (diff) | |
download | perl-a6f4eb0a57a2e0009d1bf64dff4f70a26302e92d.tar.gz |
updates to compiler modules
Message-ID: <19990303072725.779.qmail@hotmail.com>
Subject: PATCH 5.005_56 + Test procedure
p4raw-id: //depot/perl@3066
Diffstat (limited to 'lib')
-rw-r--r-- | lib/Test/Harness.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Test/Harness.pm b/lib/Test/Harness.pm index 738f36d4fc..71c0c1c1ce 100644 --- a/lib/Test/Harness.pm +++ b/lib/Test/Harness.pm @@ -82,7 +82,7 @@ sub runtests { $s .= q[ "-T"] if $first =~ /^#!.*\bperl.*-\w*T/; $fh->close or print "can't close $test. $!\n"; my $cmd = ($ENV{'COMPILE_TEST'})? -"./perl -I../lib ../utils/perlcc $test -run -verbose dcf -log ./compilelog |" +"./perl -I../lib ../utils/perlcc $test -run 2>> ./compilelog |" : "$^X $s $test|"; $cmd = "MCR $cmd" if $^O eq 'VMS'; $fh->open($cmd) or print "can't run $test. $!\n"; |