Fix reap() clobbering the return stack, as reported by Torsten Foertsch in RT #44204

[perl/modules/Scope-Upper.git] / Upper.xs

diff --git a/Upper.xs b/Upper.xs
index afb1275492c19352f46c44c3ee64c1d735d1fcc9..8f6bda8377418af6a8dd29d82ac833b9a6ce6e3c 100644 (file)
--- a/Upper.xs
+++ b/Upper.xs
@@ -310,7 +310,6 @@ STATIC void su_call(pTHX_ void *ud_) {
   --cxstack_ix;
 #endif
 
- SPAGAIN;
  PUTBACK;
 
  FREETMPS;