Turn op_pmreplroot in struct pmop into a real union.

p4raw-id: //depot/perl@30865

1 files changed, 6 insertions, 4 deletions

diff --git a/pp.c b/pp.c
index bec9933c49..8d53497b68 100644
--- a/pp.c
+++ b/pp.c
@@ -4572,13 +4572,15 @@ PP(pp_split)
 
     RX_MATCH_UTF8_set(rx, do_utf8);
 
-    if (pm->op_pmreplroot) {
 #ifdef USE_ITHREADS
-	ary = GvAVn((GV*)PAD_SVl(INT2PTR(PADOFFSET, pm->op_pmreplroot)));
+    if (pm->op_pmreplrootu.op_pmtargetoff) {
+	ary = GvAVn((GV*)PAD_SVl(pm->op_pmreplrootu.op_pmtargetoff));
+    }
 #else
-	ary = GvAVn((GV*)pm->op_pmreplroot);
-#endif
+    if (pm->op_pmreplrootu.op_pmtargetgv) {
+	ary = GvAVn(pm->op_pmreplrootu.op_pmtargetgv);
     }
+#endif
     else if (gimme != G_ARRAY)
 	ary = GvAVn(PL_defgv);
     else