From 639cf43be4808c24d6c8660c3a09bcb92311abbf Mon Sep 17 00:00:00 2001 From: Ilya Zakharevich Date: Tue, 16 Sep 2003 12:17:57 -0700 Subject: [PATCH] magic.t Message-ID: <20030917021757.GA20261@math.berkeley.edu> p4raw-id: //depot/perl@21257 --- t/op/magic.t | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/t/op/magic.t b/t/op/magic.t index 74a8d25..7a93281 100755 --- a/t/op/magic.t +++ b/t/op/magic.t @@ -125,7 +125,8 @@ END END close CMDPIPE; $? >>= 8 if $^O eq 'VMS'; # POSIX status hiding in 2nd byte - print $? & 0xFF ? "ok 6\n" : "not ok 6\n"; + my $todo = ($^O eq 'os2' ? ' # TODO: EMX v0.9d_fix4 bug: wrong nibble? ' : ''); + print $? & 0xFF ? "ok 6$todo\n" : "not ok 6$todo\n"; $test += 4; } -- 2.7.4