File swig-1.3.36-perl-long-long.patch of Package swig

---
 Lib/perl5/perlprimtypes.swg |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

--- Lib/perl5/perlprimtypes.swg.orig
+++ Lib/perl5/perlprimtypes.swg
@@ -111,7 +111,7 @@ SWIG_AsVal_dec(unsigned long)(SV *obj, u
     if (val) *val = SvUV(obj);
     return SWIG_OK;
   } else  if (SvIOK(obj)) {
-    long v = SvIV(obj);
+    long long v = SvIV(obj);
     if (v >= 0) {
       if (val) *val = v;
       return SWIG_OK;
@@ -246,7 +246,7 @@ SWIG_AsVal_dec(unsigned long long)(SV *o
     if (val) *val = SvUV(obj);
     return SWIG_OK;
   } else  if (SvIOK(obj)) {
-    long v = SvIV(obj);
+    long long v = SvIV(obj);
     if (v >= 0) {
       if (val) *val = v;
       return SWIG_OK;