diff options
| author | Rafael Garcia-Suarez <rgs@consttype.org> | 2009-10-03 09:56:42 +0200 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgs@consttype.org> | 2009-10-03 09:56:42 +0200 |
| commit | 6f6ac1dea8501596050bc974dc468632797d51eb (patch) | |
| tree | 5d5ed4df5104c3e0de5c3f5deb6baf763483051b /t/lib | |
| parent | 085fe5e3f25d1e01aa43f2b4f57652dea9b3ab4b (diff) | |
| download | perl-6f6ac1dea8501596050bc974dc468632797d51eb.tar.gz | |
Change warning "Unicode character is illegal" to more accurate description
That now reads "Unicode non-character is illegal in interchange" and the
perldiag documentation is expanded a bit.
Diffstat (limited to 't/lib')
| -rw-r--r-- | t/lib/warnings/utf8 | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/t/lib/warnings/utf8 b/t/lib/warnings/utf8 index 6635f02d75..be49ae9fe5 100644 --- a/t/lib/warnings/utf8 +++ b/t/lib/warnings/utf8 @@ -62,10 +62,10 @@ my $max = chr(0x10FFFF); EXPECT UTF-16 surrogate 0xd800 at - line 3. UTF-16 surrogate 0xdfff at - line 4. -Unicode character 0xfffe is illegal at - line 8. -Unicode character 0xffff is illegal at - line 9. -Unicode character 0x10fffe is illegal at - line 12. -Unicode character 0x10ffff is illegal at - line 13. +Unicode non-character 0xfffe is illegal for interchange at - line 8. +Unicode non-character 0xffff is illegal for interchange at - line 9. +Unicode non-character 0x10fffe is illegal for interchange at - line 12. +Unicode non-character 0x10ffff is illegal for interchange at - line 13. ######## use warnings 'utf8'; my $d7ff = pack("U", 0xD7FF); @@ -96,10 +96,10 @@ my $max = pack("U", 0x10FFFF); EXPECT UTF-16 surrogate 0xd800 at - line 3. UTF-16 surrogate 0xdfff at - line 4. -Unicode character 0xfffe is illegal at - line 8. -Unicode character 0xffff is illegal at - line 9. -Unicode character 0x10fffe is illegal at - line 12. -Unicode character 0x10ffff is illegal at - line 13. +Unicode non-character 0xfffe is illegal for interchange at - line 8. +Unicode non-character 0xffff is illegal for interchange at - line 9. +Unicode non-character 0x10fffe is illegal for interchange at - line 12. +Unicode non-character 0x10ffff is illegal for interchange at - line 13. ######## use warnings 'utf8'; my $d7ff = "\x{D7FF}"; @@ -130,7 +130,7 @@ my $max = "\x{10FFFF}"; EXPECT UTF-16 surrogate 0xd800 at - line 3. UTF-16 surrogate 0xdfff at - line 4. -Unicode character 0xfffe is illegal at - line 8. -Unicode character 0xffff is illegal at - line 9. -Unicode character 0x10fffe is illegal at - line 12. -Unicode character 0x10ffff is illegal at - line 13. +Unicode non-character 0xfffe is illegal for interchange at - line 8. +Unicode non-character 0xffff is illegal for interchange at - line 9. +Unicode non-character 0x10fffe is illegal for interchange at - line 12. +Unicode non-character 0x10ffff is illegal for interchange at - line 13. |