diff options
| author | Karl Williamson <public@khwilliamson.com> | 2012-03-19 10:52:25 -0600 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2012-03-19 18:23:43 -0600 |
| commit | 95701e00f8e747fe1c24564cb038be375695df5a (patch) | |
| tree | 9a2e5cab3d0177782fe0cc457034e199e8d5683a /t | |
| parent | 8752e5a8bd5a13883a0909d80ec0e205f71f8dbd (diff) | |
| download | perl-95701e00f8e747fe1c24564cb038be375695df5a.tar.gz | |
perlguts, warnings.t: Update references to obsolete fcn names
These functions were replaced long ago, apparently in 5.8, but I didn't
verify that for sure.
Diffstat (limited to 't')
| -rw-r--r-- | t/lib/warnings/utf8 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/lib/warnings/utf8 b/t/lib/warnings/utf8 index 7d3886c388..608f198fb9 100644 --- a/t/lib/warnings/utf8 +++ b/t/lib/warnings/utf8 @@ -1,7 +1,7 @@ utf8.c AOK - [utf8_to_uv] + [utf8_to_uvchr] Malformed UTF-8 character my $a = ord "\x80" ; @@ -14,7 +14,7 @@ <<<<<< Add a test when something actually calls utf16_to_utf8 __END__ -# utf8.c [utf8_to_uv] -W +# utf8.c [utf8_to_uvchr] -W BEGIN { if (ord('A') == 193) { print "SKIPPED\n# ebcdic platforms do not generate Malformed UTF-8 warnings."; |