Un-mathom Perl_save_I16

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

p4raw-id: //depot/perl@31033

1 files changed, 10 insertions, 0 deletions

diff --git a/scope.c b/scope.c
index 171fd784e8..e38dedf392 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;