diff options
| author | Karl Williamson <khw@cpan.org> | 2019-04-05 16:34:21 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2019-04-05 17:14:11 -0600 |
| commit | bc035eed7aac5997a56d34b98261cc7a99da4787 (patch) | |
| tree | 19d884cdec4ad62b95005d975bf3ff46248713f0 /t | |
| parent | 45671da298df5eb367286a19e0b03796307902c9 (diff) | |
| download | perl-bc035eed7aac5997a56d34b98261cc7a99da4787.tar.gz | |
PATCH: [perl #133988], Assertion failure
This was due to not checking that a \N{} expanded to a single code point
in contexts where only that is legal. This never could have worked
properly, though the assertion failure is new.
The diagnostic needs to be reworded to accommodate this new case, but
its too late in the 5.29 cycle to do that, so I'm changing just the
description, and will reword in 5.31, [perl #133996]
Diffstat (limited to 't')
| -rw-r--r-- | t/re/reg_mesg.t | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/t/re/reg_mesg.t b/t/re/reg_mesg.t index 4a652ba6e4..c5c79f0323 100644 --- a/t/re/reg_mesg.t +++ b/t/re/reg_mesg.t @@ -317,6 +317,7 @@ my @death = '/\p{Is_Other_Alphabetic=F}/ ' => 'Can\'t find Unicode property definition "Is_Other_Alphabetic=F" {#} m/\p{Is_Other_Alphabetic=F}{#}/', '/\p{Is_Other_Alphabetic=F}/ ' => 'Can\'t find Unicode property definition "Is_Other_Alphabetic=F" {#} m/\p{Is_Other_Alphabetic=F}{#}/', '/\x{100}(?(/' => 'Unknown switch condition (?(...)) {#} m/\\x{100}(?({#}/', # [perl #133896] + '/(?[\N{KEYCAP DIGIT NINE}/' => '\N{} in inverted character class or as a range end-point is restricted to one character {#} m/(?[\\N{U+39.FE0F.20E3{#}}/', # [perl #133988] ); # These are messages that are death under 'use re "strict"', and may or may |