diff options
author | Karl Williamson <public@khwilliamson.com> | 2012-12-20 09:29:36 -0700 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2012-12-22 11:11:33 -0700 |
commit | 7dbf68d2396b16bcbba2780133a8c8aa3b172884 (patch) | |
tree | 5ad51efe02db18c07b01f97e2f4d8dcc52923db6 /pp.c | |
parent | 5ac65bffc18d1c86e719feb45600a976e397ac76 (diff) | |
download | perl-7dbf68d2396b16bcbba2780133a8c8aa3b172884.tar.gz |
Create internal _is_utf8_mark()
This is so we can deprecate non-core use of the existing one in a future
commit. XS coders should be using the macros in handy.h instead of
calling such functions directly. A future commit will deprecate all of
them, but first the core uses of this one must change so they don't
generate deprecation messages. I will not have a chance to look for
some time, but I suspect that most uses of this function in the core
should be changed to use something else, but in the meantime, the
non-core uses can be deprecated.
Diffstat (limited to 'pp.c')
-rw-r--r-- | pp.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -3757,7 +3757,7 @@ PP(pp_uc) STRLEN u; STRLEN ulen; UV uv; - if (in_iota_subscript && ! is_utf8_mark(s)) { + if (in_iota_subscript && ! _is_utf8_mark(s)) { /* A non-mark. Time to output the iota subscript */ #define GREEK_CAPITAL_LETTER_IOTA 0x0399 |