diff -ur a/perl-5.22.2/op.c b/perl-5.22.2/op.c
--- a/perl-5.22.2/op.c	2016-04-08 23:45:19.000000000 +0200
+++ b/perl-5.22.2/op.c	2016-06-12 15:16:56.239994852 +0200
@@ -841,7 +841,7 @@
     bool still_valid = gv && SvREFCNT(gv);
 
     if (still_valid)
-        SvREFCNT_inc_simple_void(gv);
+        SvREFCNT_inc_simple_void(*svp);
 #ifdef USE_ITHREADS
     if (*ixp > 0) {
         pad_swipe(*ixp, TRUE);