diff options
author | Karl Williamson <khw@cpan.org> | 2019-12-04 13:45:24 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2019-12-14 13:22:56 -0700 |
commit | f912df254fa1bc19054cddb92a1332da5233be96 (patch) | |
tree | 0cad68ac67f105c58135698e9ab301e3db5cd228 | |
parent | 8d527d4bf1c76dba76fb6541eeb458628fdd528d (diff) | |
download | perl-f912df254fa1bc19054cddb92a1332da5233be96.tar.gz |
t/re/pat.t: Skip tests that don't work on EBCDIC
These are fuzzer generated, and don't translate well to EBCDIC
-rw-r--r-- | t/re/pat.t | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/t/re/pat.t b/t/re/pat.t index eb53e7c2c8..338bf8d780 100644 --- a/t/re/pat.t +++ b/t/re/pat.t @@ -2078,7 +2078,10 @@ CODE { # [perl #133871], ASAN/valgrind out-of-bounds access fresh_perl_like('qr/(?|(())|())|//', qr/syntax error/, {}, "[perl #133871]"); } + SKIP: { # [perl #133921], segfault + skip "Not valid for EBCDIC", 5 if $::IS_EBCDIC; + fresh_perl_is('qr0||ß+p00000F00000ù\Q00000ÿ00000x00000x0c0e0\Qx0\Qx0\x{0c!}\;\;î0\x fresh_perl_is('|ß+W0ü0r0\Qx0\Qx0x0c0G00000000000000000O000000000x0x0x0c!}\;îçÿù\Q0 \x |