sync with cpan release of Devel-PPPort 3.49
authorNicolas R <atoomic@cpan.org>
Mon, 29 Apr 2019 17:53:13 +0000 (11:53 -0600)
committerNicolas R <atoomic@cpan.org>
Mon, 29 Apr 2019 17:55:57 +0000 (11:55 -0600)
Porting/Maintainers.pl
dist/Devel-PPPort/Changes
dist/Devel-PPPort/PPPort_pm.PL
dist/Devel-PPPort/parts/inc/uv

index 3ea20a3..848061b 100755 (executable)
@@ -342,7 +342,7 @@ use File::Glob qw(:case);
     },
 
     'Devel::PPPort' => {
-        'DISTRIBUTION' => 'ETHER/Devel-PPPort-3.48.tar.gz',
+        'DISTRIBUTION' => 'ATOOMIC/Devel-PPPort-3.49.tar.gz',
         'FILES'        => q[dist/Devel-PPPort],
         'EXCLUDED'     => [
             'PPPort.pm',    # we use PPPort_pm.PL instead
index ded335c..255b9a5 100644 (file)
@@ -1,4 +1,8 @@
 Revision history for Devel-PPPort
+ 3.49 - 2019-04-29
+
+    * Fix tests for 64bit int, 32bit ptr platforms
 
  3.48 - 2019-04-28
 
index 66959e7..7c28375 100644 (file)
@@ -551,7 +551,7 @@ package Devel::PPPort;
 use strict;
 use vars qw($VERSION $data);
 
-$VERSION = '3.48';
+$VERSION = '3.49';
 
 sub _init_data
 {
index 9d8b02f..5e5a74a 100644 (file)
@@ -383,7 +383,12 @@ utf8_to_uvchr_buf(s, adjustment)
             av_push(av, newSVuv(utf8_to_uvchr_buf(s,
                                                   s + UTF8SKIP(s) + adjustment,
                                                   &len)));
-            av_push(av, newSViv((IV) len));
+            if (len == (STRLEN) -1) {
+                av_push(av, newSViv(-1));
+            }
+            else {
+                av_push(av, newSVuv(len));
+            }
             RETVAL = av;
         OUTPUT:
                 RETVAL
@@ -397,7 +402,12 @@ utf8_to_uvchr(s)
         CODE:
             av = newAV();
             av_push(av, newSVuv(utf8_to_uvchr(s, &len)));
-            av_push(av, newSViv((IV) len));
+            if (len == (STRLEN) -1) {
+                av_push(av, newSViv(-1));
+            }
+            else {
+                av_push(av, newSVuv(len));
+            }
             RETVAL = av;
         OUTPUT:
                 RETVAL