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.

diff --git a/utf8.c b/utf8.c
index bd3aee1..d51d83d 100644 (file)
--- 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");
 }