This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
t/re/anyof.t: Remove invalid test
authorKarl Williamson <khw@cpan.org>
Wed, 18 Sep 2019 18:34:23 +0000 (12:34 -0600)
committerKarl Williamson <khw@cpan.org>
Sun, 17 Nov 2019 19:34:37 +0000 (12:34 -0700)
One shouldn't be able to specify an infinite code point.  The tests have
the conceit that one can specify a range's upper limit as infinity, but
that is just shorthand for the range being unbounded.

t/re/anyof.t

index b99ba62..14676dc 100644 (file)
@@ -708,7 +708,6 @@ my @tests = (
     '[\x{10C}-{INFTY}\x{104}\x{102}]' => 'ANYOFH[0102 0104 010C-INFTY]',
     '[\x{10C}-{INFTY}\x{104}\x{102}\x{103}]' => 'ANYOFH[0102-0104 010C-INFTY]',
     '[{INFTY_minus_1}]' => 'ANYOFH[INFTY_minus_1]',
-    '[{INFTY}]' => 'ANYOFH[INFTY-INFTY]',
 
     '(?8)(?i)[\x{100}]' => 'EXACTFU_REQ8 <\x{101}>',
     '(?8)(?i)[\x{399}]' => 'EXACTFU_REQ8 <\x{3b9}>',