summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Williamson <public@khwilliamson.com>2011-09-24 15:17:33 -0600
committerKarl Williamson <public@khwilliamson.com>2011-10-01 09:58:09 -0600
commitc0249a20a804e6fc6fcddc544485daf1e2dffac8 (patch)
tree9cce04ad159137e682eed5edeb19a534c21ff7ec
parenteb0052d12453d188c7a1927092ec86ea704a0e60 (diff)
downloadperl-c0249a20a804e6fc6fcddc544485daf1e2dffac8.tar.gz
utf8.c: Remove (mostly) redundant test
The swashes already have the underscore, so this test is redundant. It does save some time for this character to avoid having to go out and load the swash, but why just the underscore? In fact an earlier commit changed the macro that most people should use to access this function to not even call it for the underscore.
-rw-r--r--utf8.c4
1 files changed, 0 insertions, 4 deletions
diff --git a/utf8.c b/utf8.c
index bd3aee1fcb..d51d83defb 100644
--- a/utf8.c
+++ b/utf8.c
@@ -1516,8 +1516,6 @@ Perl_is_utf8_idcont(pTHX_ const U8 *p)
PERL_ARGS_ASSERT_IS_UTF8_IDCONT;
- if (*p == '_')
- return TRUE;
return is_utf8_common(p, &PL_utf8_idcont, "IdContinue");
}
@@ -1528,8 +1526,6 @@ Perl_is_utf8_xidcont(pTHX_ const U8 *p)
PERL_ARGS_ASSERT_IS_UTF8_XIDCONT;
- if (*p == '_')
- return TRUE;
return is_utf8_common(p, &PL_utf8_idcont, "XIdContinue");
}