diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-11-21 15:02:39 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-11-21 15:02:39 +0000 |
commit | e826edc34da0d6aba91789176560a95b7ac6c6a9 (patch) | |
tree | 8aa91854ba56deb862986f7c9e5338fde6320219 /t/op/study.t | |
parent | 7d72809808f8a559a91c7cd69d41d3042afd2994 (diff) | |
download | perl-e826edc34da0d6aba91789176560a95b7ac6c6a9.tar.gz |
Strange: the same mysterious regex study bug
seems to be present both in OS/390 and POSIX-BC.
Deep EBCDIC magic that regex engine gets wrong,
or a bug in some compiler/library shared by the
two platforms? From Thomas Dorner.
p4raw-id: //depot/perl@13170
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; |