diff options
| author | Karl Williamson <public@khwilliamson.com> | 2013-12-31 21:41:09 -0700 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2014-01-01 13:49:23 -0700 |
| commit | 0cfa64bfe0ab570e7b2ddddfdad71f8341a5e6e1 (patch) | |
| tree | a0fe001febf5c9da8aa815e54367e47e742c96da /utf8.c | |
| parent | 1a89bb6c2ba7b1d0b44a5a627009274b3cde11a1 (diff) | |
| download | perl-0cfa64bfe0ab570e7b2ddddfdad71f8341a5e6e1.tar.gz | |
utf8.c: Don't do redundant test
The test here for WARN_UTF8 is redundant, as only if one of the other
three warning categories is enabled will anything actually be output.
Diffstat (limited to 'utf8.c')
| -rw-r--r-- | utf8.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -107,7 +107,7 @@ Perl_uvoffuni_to_utf8_flags(pTHX_ U8 *d, UV uv, UV flags) /* The first problematic code point is the first surrogate */ if (uv >= UNICODE_SURROGATE_FIRST - && ckWARN4_d(WARN_UTF8, WARN_SURROGATE, WARN_NON_UNICODE, WARN_NONCHAR)) + && ckWARN3_d(WARN_SURROGATE, WARN_NON_UNICODE, WARN_NONCHAR)) { if (UNICODE_IS_SURROGATE(uv)) { if (flags & UNICODE_WARN_SURROGATE) { |