initialize the PL_xpvgv_[arena]root vars during clone

p4raw-id: //depot/perl@24467

diff --git a/sv.c b/sv.c
index 2536594..3d4d5b2 100644 (file)
--- a/sv.c
+++ b/sv.c
@@ -11741,6 +11741,8 @@ perl_clone_using(PerlInterpreter *proto_perl, UV flags,
     PL_xpvhv_root      = NULL;
     PL_xpvmg_arenaroot = NULL;
     PL_xpvmg_root      = NULL;
+    PL_xpvgv_arenaroot = NULL;
+    PL_xpvgv_root      = NULL;
     PL_xpvlv_arenaroot = NULL;
     PL_xpvlv_root      = NULL;
     PL_xpvbm_arenaroot = NULL;