From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Tue, 29 Dec 1998 12:07:54 +0000 (+0000)
Subject: Undo #2519 (breaks universal.c).
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2c2e9926ef6d46bb2564f869be4c46f4aa1b869d;p=p5sagit%2Fp5-mst-13.2.git

Undo #2519 (breaks universal.c).

p4raw-id: //depot/cfgperl@2521
---

diff --git a/XSUB.h b/XSUB.h
index 32e0810..dbe0c39 100644
--- a/XSUB.h
+++ b/XSUB.h
@@ -29,13 +29,10 @@
 #define XSINTERFACE_FUNC_SET(cv,f)	\
 		CvXSUBANY(cv).any_dptr = (void (*) _((void*)))(f)
 
-#define XSFLUSHARGS \
-	PL_stack_sp = PL_stack_base + ax + ((off) - 1)
-
-#define XSRETURN(off)				\
-    STMT_START {				\
-	XSFLUSHARGS;				\
-	return;					\
+#define XSRETURN(off)					\
+    STMT_START {					\
+	PL_stack_sp = PL_stack_base + ax + ((off) - 1);	\
+	return;						\
     } STMT_END
 
 /* Simple macros to put new mortal values onto the stack.   */