diff options
author | Father Chrysostomos <sprout@cpan.org> | 2013-06-18 13:40:18 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2013-06-18 13:40:50 -0700 |
commit | 670610ebb17508101065cc5f5ecfe616aace5335 (patch) | |
tree | 8d2716cea7dd7fd9eb9d25e71fd6a472fce53a55 /t | |
parent | 798dc914c398c7c040331cbc085457859797cc6f (diff) | |
download | perl-670610ebb17508101065cc5f5ecfe616aace5335.tar.gz |
UTF8f
This new format string allows char*s to be interpolated with the
utf8ness and length specified as well:
Perl_croak(aTHX_ "Couldn't twiggle the twoggle in \"%"UTF8f"\"",
is_utf8, len, s);
This commit changes one function call in gv.c to use UTF8f (it should
go faster now) as an example of its use.
This was brought up in ticket #113824. This commit does not fix
#113824, but provides groundwork that makes it easier to fix.
Diffstat (limited to 't')
-rw-r--r-- | t/porting/diag.t | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/t/porting/diag.t b/t/porting/diag.t index dc9a68848e..3315433081 100644 --- a/t/porting/diag.t +++ b/t/porting/diag.t @@ -162,6 +162,7 @@ my %specialformats = (IVdf => 'd', NVgf => 'f', HEKf256=>'s', HEKf => 's', + UTF8f=> 's', SVf256=>'s', SVf32=> 's', SVf => 's'); |