At 03:35 PM 4/30/2002 -0400, Michael G Schwern wrote: >On Tue, Apr 30, 2002 at 02:28:21PM -0500, Craig A. Berry wrote: >> >WRT to VMS tests, the problem was Test::Harness made a special case to >> >display native VMS exit codes rather than do POSIX emulation. >> >Test::Harness::Straps didn't emulate this until just now. Is this the >> >desired behavior? > >Was that a "yes"?
Yes, because you are explicitly testing for exit statuses other than 0, 1, 2, or 4. >Allow me to rephrase. What would you like the behavior to be on VMS? > > >> If you use the POSIX emulation, (which is what $? does by default) you will >> only see the following values: >> >> 0 = success >> 1 = warning >> 2 = error >> 4 = fatal error >> >> If you need more than those, you can do so via the "use vmsish 'exit'" and >> "use vmsish 'status'" pragmas, but in that case you won't see everything >> shifted up by 8 bits like POSIX statuses are. > > >-- > >Michael G. Schwern <[EMAIL PROTECTED]> http://www.pobox.com/~schwern/ >Perl Quality Assurance <[EMAIL PROTECTED]> Kwalitee Is Job One >do that funky dance >two parts flour one part water >get out of my butt > -- Fmh
