1 files changed, 1 insertions, 1 deletions
diff --git a/op.c b/op.c
index beaac6ace2..d08f2ff91b 100644
--- a/op.c
+++ b/op.c
@@ -3374,7 +3374,7 @@ newSUB(I32 floor, OP *o, OP *proto, OP *block)
 	else
 	    sv_setiv((SV*)gv, -1);
 	SvREFCNT_dec(compcv);
-	compcv = NULL;
+	cv = compcv = NULL;
 	sub_generation++;
 	goto noblock;
     }