pp_grepwhile: no need to extend the stack

when returning from grep in scalar context, no need to extend the stack by
one when pushing the result count, since the last grep iteration will have
pushed its result which we've just popped.

1 files changed, 2 insertions, 2 deletions

diff --git a/pp_hot.c b/pp_hot.c
index c580f26021..4c391f7552 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -3579,10 +3579,10 @@ PP(pp_grepwhile)
 	SP = PL_stack_base + POPMARK;		/* pop original mark */
 	if (gimme == G_SCALAR) {
             if (PL_op->op_private & OPpTRUEBOOL)
-                XPUSHs(items ? &PL_sv_yes : &PL_sv_zero);
+                PUSHs(items ? &PL_sv_yes : &PL_sv_zero);
             else {
 		dTARGET;
-		XPUSHi(items);
+		PUSHi(items);
             }
 	}
 	else if (gimme == G_ARRAY)