1 files changed, 1 insertions, 1 deletions
diff --git a/pp_ctl.c b/pp_ctl.c
index 5b850d2590..71634fbf84 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -2430,7 +2430,7 @@ PP(pp_goto)
 			(void)SvUPGRADE(sv, SVt_PVIV);
 			(void)SvIOK_on(sv);
 			SAVEIV(SvIVX(sv));
-			SvIVX(sv) = PTR2IV(cv); /* Do it the quickest way */
+			SvIV_set(sv, PTR2IV(cv)); /* Do it the quickest way */
 		    } else {
 			save_item(sv);
 			gv_efullname3(sv, CvGV(cv), Nullch);