Integrate:

[ 32849]
Replace all reads of RXf_UTF8 with RX_UTF8().
p4raw-link: @32849 on //depot/perl: 3c8556c3bff92f6c755a00c0166f795d7176b75d

p4raw-id: //depot/maint-5.10/perl@33149
p4raw-integrated: from //depot/perl@32849 'edit in' regexec.c
	(@32840..) regcomp.c (@32845..) 'merge in' ext/re/re.xs
	(@32802..) pp.c (@32821..) pp_hot.c (@32837..) dump.c
	(@32838..)

1 files changed, 2 insertions, 2 deletions

diff --git a/regcomp.c b/regcomp.c
index c8fc6dbc35..c476189f0d 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -9240,7 +9240,7 @@ Perl_regfree_internal(pTHX_ REGEXP * const r)
 	    reginitcolors();
 	{
 	    SV *dsv= sv_newmortal();
-            RE_PV_QUOTED_DECL(s, (r->extflags & RXf_UTF8),
+            RE_PV_QUOTED_DECL(s, RX_UTF8(r),
                 dsv, RX_PRECOMP(r), RX_PRELEN(r), 60);
             PerlIO_printf(Perl_debug_log,"%sFreeing REx:%s %s\n", 
                 PL_colors[4],PL_colors[5],s);
@@ -9594,7 +9594,7 @@ Perl_reg_stringify(pTHX_ MAGIC *mg, STRLEN *lp, U32 *flags, I32 *haseval ) {
     if (haseval) 
         *haseval = RX_SEEN_EVALS(re);
     if (flags)    
-	*flags = ((RX_EXTFLAGS(re) & RXf_UTF8) ? 1 : 0);
+	*flags = RX_UTF8(re) ? 1 : 0;
     if (lp)
 	*lp = RX_WRAPLEN(re);
     return RX_WRAPPED(re);