|
|
@@ -0,0 +1,24 @@
+---
+ 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;
|