diff options
| author | Karl Williamson <public@khwilliamson.com> | 2012-02-11 10:49:06 -0700 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2012-02-11 14:01:29 -0700 |
| commit | dab0c3e7e357a28081ca24560f20e83c1d47ce1f (patch) | |
| tree | d9908bba3f41f503a3d7c9bd3bfb5b4c3ab15fd4 /t | |
| parent | 24ad4a07e88519ae8e63d0b67d519e62a935b577 (diff) | |
| download | perl-dab0c3e7e357a28081ca24560f20e83c1d47ce1f.tar.gz | |
regcomp.c: /[[:lower:]]/i should match the same as /\p{Lower}/i
Same for [[:upper:]] and \p{Upper}. These were matching instead all of
[[:alpha:]] or \p{Alpha}. What /\p{Lower}/i and /\p{Upper}/i match instead
is \p{Cased}, and so that is what these should match.
Diffstat (limited to 't')
| -rw-r--r-- | t/re/re_tests | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/t/re/re_tests b/t/re/re_tests index 2bdb24cdb8..4eafaf79bc 100644 --- a/t/re/re_tests +++ b/t/re/re_tests @@ -1567,4 +1567,9 @@ abc\N{def - c - \\N{NAME} must be resolved by the lexer # /i properties shouldn't match more than the property itself /[[:ascii:]]/i \N{KELVIN SIGN} n - - +# [[:lower:]]/i and [[:upper:]]/i should match what \p{Lower} and \p{Upper} do. +# which is \p{Cased}, not \p{Alpha}, +/[[:lower:]]/i \N{U+3400} n - - +/[[:upper:]]/i \N{U+01BB} n - - + # vim: softtabstop=0 noexpandtab |