From: Jerry D. Hedden <jdhedden@cpan.org>
Date: Mon, 23 Apr 2007 09:10:01 +0000 (-0400)
Subject: Un-mathom Perl_save_I16
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=87a84751032b6ca30af6fd676ff1f32e6577d6fc;p=p5sagit%2Fp5-mst-13.2.git

Un-mathom Perl_save_I16
From: "Jerry D. Hedden" <jdhedden@cpan.org>
Message-ID: <1ff86f510704230610t13c62378s381eaceae3e7e9b1@mail.gmail.com>

p4raw-id: //depot/perl@31033
---

diff --git a/mathoms.c b/mathoms.c
index 708645e..4f8ee56 100644
--- a/mathoms.c
+++ b/mathoms.c
@@ -1182,16 +1182,6 @@ Perl_save_long(pTHX_ long int *longp)
 }
 
 void
-Perl_save_I16(pTHX_ I16 *intp)
-{
-    dVAR;
-    SSCHECK(3);
-    SSPUSHINT(*intp);
-    SSPUSHPTR(intp);
-    SSPUSHINT(SAVEt_I16);
-}
-
-void
 Perl_save_iv(pTHX_ IV *ivp)
 {
     dVAR;
diff --git a/scope.c b/scope.c
index 171fd78..e38dedf 100644
--- a/scope.c
+++ b/scope.c
@@ -351,6 +351,16 @@ Perl_save_I8(pTHX_ I8 *bytep)
 }
 
 void
+Perl_save_I16(pTHX_ I16 *intp)
+{
+    dVAR;
+    SSCHECK(3);
+    SSPUSHINT(*intp);
+    SSPUSHPTR(intp);
+    SSPUSHINT(SAVEt_I16);
+}
+
+void
 Perl_save_I32(pTHX_ I32 *intp)
 {
     dVAR;