diff options
author | Karl Williamson <khw@cpan.org> | 2020-08-02 20:19:17 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2020-08-02 20:22:42 -0600 |
commit | 740fde89fa2ff46aa80924d8a826b70facd60115 (patch) | |
tree | 063d8d19732f5514eb9703cfcd0c48b3ad9acf82 /lib/charnames.t | |
parent | d67f622bde38e53070faaac0240fc2a354364c8a (diff) | |
download | perl-740fde89fa2ff46aa80924d8a826b70facd60115.tar.gz |
Revert "Revert "Debugging GH #17671.""
This reverts commit 83aa75213860c4aa879853b1bac9e58a116214ab.
That commit was itself a reversion, hoping that various changes had
fixed a bug. But it has cropped up, so the bug isn't fixed, and so this
is the reversion of the reversion.
Diffstat (limited to 'lib/charnames.t')
-rw-r--r-- | lib/charnames.t | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/charnames.t b/lib/charnames.t index 2e7f2535f5..01e1fd7d92 100644 --- a/lib/charnames.t +++ b/lib/charnames.t @@ -157,6 +157,10 @@ sub test_vianame ($$$) { $wildcard_count++; + # XXX temporary to see if the failure we are occasionally seeing is + # confined to this code point. GH #17671 + next if $i == 0; + # Because wildcard name matching is so real-time intensive, do it less # frequently than the others if ($wildcard_count >= 10) { |