Front page | perl.perl5.porters |
Postings from August 2001
On Tue, Jul 31, 2001 at 12:19:29PM -0500, Craig A. Berry wrote: > 2, it turns out. Here are the warning, error, and fatal error flavors of > the abort status (which you landed on by chance), which return 1, 2, and 4 > respectively: Want to patch up perlport, too? > Odd numbers always indicate success so system() returns zero. The following > may be considered a patch if you wish since all the new tests pass, though > this may or may not be the appropriate place to do them. I'll try to have a > look at lib/Test/Simple/t/simple.t as well. lib/Test/Simple/t/exit.t you mean. Since Test::Simple uses its numeric exit code to indicate how many tests failed, that's just not going to work on VMS. Going to have to just skip the whole thing. > $? in an END block still doesn't work and may be genuinely broken on VMS (or > just never implemented); any idea where in the sources I would look to see > where this is done? Nope, sorry. Hmmm... B::Terse doesn't seem to see END blocks. > --- t/run/exit.t;-0 Mon Jul 9 09:11:31 2001 > +++ t/run/exit.t Tue Jul 31 12:01:03 2001 > @@ -18,15 +18,41 @@ > return system($cmd.$quote.$code.$quote); > } > > -use Test::More tests => 3; > +## can't use this in 'use Test::More' yet > +##my $numtests = ($^O eq 'VMS') ? 7 : 3; Patch looks sensible except for this sort of thing. Just delete old lines, don't comment them out. If we want to see history, we can look back through Perforce. -- Michael G. Schwern <schwern@pobox.com> http://www.pobox.com/~schwern/ Perl6 Quality Assurance <perl-qa@perl.org> Kwalitee Is Job One Your average appeasement engineer is about as clued-up on computers as the average computer "hacker" is about B.O. -- BOFHThread Previous | Thread Next