diff options
Diffstat (limited to 't/op/study.t')
| -rwxr-xr-x | t/op/study.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/op/study.t b/t/op/study.t index 3ca95355b0..d90efdc4d2 100755 --- a/t/op/study.t +++ b/t/op/study.t @@ -105,8 +105,8 @@ ok(/^$_$/); $* = 1; # test 3 only tested the optimized version--this one is for real ok("ab\ncd\n" =~ /^cd/); -if ($^O eq 'os390') { - # Even with the alarm() OS/390 can't manage these tests +if ($^O eq 'os390' or $^O eq 'posix-bc') { + # Even with the alarm() OS/390 and BS2000 can't manage these tests # (Perl just goes into a busy loop, luckily an interruptable one) for (25..26) { print "not ok $_ # TODO compiler bug?\n" } $test += 2; |