summaryrefslogtreecommitdiff
path: root/embed.fnc
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2016-12-07 20:48:40 -0700
committerKarl Williamson <khw@cpan.org>2016-12-23 13:21:31 -0700
commit9cbfb8abb5bb7ce49134acc57b93eb9ae475e339 (patch)
treeddc90e6d6a2ba2cc12c7079f960547ae1674769d /embed.fnc
parent1ae6ead94905dfee43773cf3b18949c91b33f9d1 (diff)
downloadperl-9cbfb8abb5bb7ce49134acc57b93eb9ae475e339.tar.gz
Add fnc to force out UTF-8 malform warnings at death
The bottom level UTF-8 decode routine now generates detailed messages when it encounters malformations. In some instances these should be treated as croak reasons and output even if warnings are off, just before dying. This commit adds a function to do this.
Diffstat (limited to 'embed.fnc')
-rw-r--r--embed.fnc3
1 files changed, 3 insertions, 0 deletions
diff --git a/embed.fnc b/embed.fnc
index 49cf3f4941..4743524f17 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -1754,6 +1754,9 @@ Ap |void |unsharepvn |NULLOK const char* sv|I32 len|U32 hash
p |void |unshare_hek |NULLOK HEK* hek
: Used in perly.y
p |void |utilize |int aver|I32 floor|NULLOK OP* version|NN OP* idop|NULLOK OP* arg
+ApM |void |_force_out_malformed_utf8_message \
+ |NN const U8 *const p|NN const U8 * const e|const U32 flags \
+ |const bool die_here
Ap |U8* |utf16_to_utf8 |NN U8* p|NN U8 *d|I32 bytelen|NN I32 *newlen
Ap |U8* |utf16_to_utf8_reversed|NN U8* p|NN U8 *d|I32 bytelen|NN I32 *newlen
AdpPR |STRLEN |utf8_length |NN const U8* s|NN const U8 *e