Turn op_pmreplroot in struct pmop into a real union.

p4raw-id: //depot/perl@30865

1 files changed, 1 insertions, 1 deletions

diff --git a/pp_hot.c b/pp_hot.c
index 9d0cf95350..76a55cbcae 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -2261,7 +2261,7 @@ PP(pp_subst)
 	    register PERL_CONTEXT *cx;
 	    SPAGAIN;
 	    PUSHSUBST(cx);
-	    RETURNOP(cPMOP->op_pmreplroot);
+	    RETURNOP(cPMOP->op_pmreplrootu.op_pmreplroot);
 	}
 	r_flags |= REXEC_IGNOREPOS | REXEC_NOT_FIRST;
 	do {