This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
handy.h: Add debugging assertion
[perl5.git]
/
inline.h
diff --git
a/inline.h
b/inline.h
index
a2727f4
..
226970b
100644
(file)
--- a/
inline.h
+++ b/
inline.h
@@
-258,7
+258,7
@@
S_append_utf8_from_native_byte(const U8 byte, U8** dest)
PERL_ARGS_ASSERT_APPEND_UTF8_FROM_NATIVE_BYTE;
- if (NATIVE_IS_INVARIANT(byte))
+ if (NATIVE_
BYTE_
IS_INVARIANT(byte))
*(*dest)++ = byte;
else {
*(*dest)++ = UTF8_EIGHT_BIT_HI(byte);