All tests pass (for me) with -DPERL_DONT_CREATE_GVSV

p4raw-id: //depot/perl@25012

2 files changed, 2 insertions, 2 deletions

diff --git a/pp.c b/pp.c
index e2649d30ca..150daddb79 100644
--- a/pp.c
+++ b/pp.c
@@ -273,7 +273,7 @@ PP(pp_rv2sv)
 		gv = (GV*)gv_fetchsv(sv, TRUE, SVt_PV);
 	    }
 	}
-	sv = GvSV(gv);
+	sv = GvSVn(gv);
     }
     if (PL_op->op_flags & OPf_MOD) {
 	if (PL_op->op_private & OPpLVAL_INTRO) {
diff --git a/pp_hot.c b/pp_hot.c
index 9cf214a757..13811f668d 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -2542,7 +2542,7 @@ PP(pp_leavesublv)
 STATIC CV *
 S_get_db_sub(pTHX_ SV **svp, CV *cv)
 {
-    SV *dbsv = GvSV(PL_DBsub);
+    SV *dbsv = GvSVn(PL_DBsub);
 
     save_item(dbsv);
     if (!PERLDB_SUB_NN) {