From 2ca72cbebc229b6b6dc5483d0ee5776828c98d3d Mon Sep 17 00:00:00 2001
From: Eugen Konkov <kes-kes@yandex.ru>
Date: Mon, 5 Jun 2017 09:07:54 +0100
Subject: [PATCH] XPUSH*: reuse code from mPUSH* macros

---
 AUTHORS | 1 +
 pp.h    | 6 +++---
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/AUTHORS b/AUTHORS
index 40c6393e00..7ef3c5c5d2 100644
--- a/AUTHORS
+++ b/AUTHORS
@@ -402,6 +402,7 @@ Erich Rickheit
 Eryq				<eryq@zeegee.com>
 Etienne Grossman		<etienne@isr.isr.ist.utl.pt>
 Eugene Alterman			<Eugene.Alterman@bremer-inc.com>
+Eugen Konkov			<kes-kes@yandex.ru>
 Evan Miller			<eam@frap.net>
 Evan Zacks			<zackse@cpan.org>
 Fabien Tassin			<tassin@eerie.fr>
diff --git a/pp.h b/pp.h
index 3b8f36f414..16cb937d18 100644
--- a/pp.h
+++ b/pp.h
@@ -443,9 +443,9 @@ Does not use C<TARG>.  See also C<L</XPUSHu>>, C<L</mPUSHu>> and C<L</PUSHu>>.
 #define mXPUSHs(s)	XPUSHs(sv_2mortal(s))
 #define XPUSHmortal	XPUSHs(sv_newmortal())
 #define mXPUSHp(p,l)	STMT_START { EXTEND(sp,1); mPUSHp((p), (l)); } STMT_END
-#define mXPUSHn(n)	STMT_START { EXTEND(sp,1); sv_setnv(PUSHmortal, (NV)(n)); } STMT_END
-#define mXPUSHi(i)	STMT_START { EXTEND(sp,1); sv_setiv(PUSHmortal, (IV)(i)); } STMT_END
-#define mXPUSHu(u)	STMT_START { EXTEND(sp,1); sv_setuv(PUSHmortal, (UV)(u)); } STMT_END
+#define mXPUSHn(n)	STMT_START { EXTEND(sp,1); mPUSHn(n); } STMT_END
+#define mXPUSHi(i)	STMT_START { EXTEND(sp,1); mPUSHi(i); } STMT_END
+#define mXPUSHu(u)	STMT_START { EXTEND(sp,1); mPUSHu(u); } STMT_END
 
 #define SETs(s)		(*sp = s)
 #define SETTARG		STMT_START { SvSETMAGIC(TARG); SETs(TARG); } STMT_END