This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
regcomp.c: Remove unnecessary flag setting
[perl5.git] / regcomp.c
index bf8d7e0..c935476 100644 (file)
--- a/regcomp.c
+++ b/regcomp.c
@@ -756,8 +756,7 @@ S_cl_anything(const RExC_state_t *pRExC_state, struct regnode_charclass_class *c
     PERL_ARGS_ASSERT_CL_ANYTHING;
 
     ANYOF_BITMAP_SETALL(cl);
-    cl->flags = ANYOF_EOS|ANYOF_UNICODE_ALL
-               |ANYOF_NON_UTF8_LATIN1_ALL;
+    cl->flags = ANYOF_EOS|ANYOF_UNICODE_ALL;
 
     /* If any portion of the regex is to operate under locale rules,
      * initialization includes it.  The reason this isn't done for all regexes