Fix leak introduced by change #32873, thanks to Nicholas

p4raw-link: @32873 on //depot/perl: 3a28f3fb1bfd44e4e3dfe6842af867c8c1c9de28

p4raw-id: //depot/perl@32915

1 files changed, 1 insertions, 1 deletions

diff --git a/pp_hot.c b/pp_hot.c
index d391272f64..a24f802174 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -733,7 +733,7 @@ PP(pp_print)
 	ENTER;
 	if( PL_op->op_type == OP_SAY ) {
 		/* local $\ = "\n" */
-		SAVESPTR(PL_ors_sv);
+		SAVEGENERICSV(PL_ors_sv);
 		PL_ors_sv = newSVpvs("\n");
 	}
 	call_method("PRINT", G_SCALAR);