Ticket #43150: perl5.16.3.diff

Portfile

@@ -4 +4 @@
 PortSystem          1.0
 
 name                perl5.16
-version             5.16.1
-revision            3
+version             5.16.3
 set branch          [join [lrange [split ${version} .] 0 1] .]
 categories          lang
 license             {Artistic-1 GPL}
@@ -23 +22 @@
 homepage            http://www.perl.org/
 master_sites        http://www.cpan.org/src/5.0/
 
-checksums           rmd160  90effd1105fb0595673b24824c760f2c79c4b317 \
-                    sha256  0704b1421fe50015becd32c8b7ed05843e8b6c188a8c16cb0c11d76986375fd0
+checksums           rmd160  f25fdd72449156a7cbe989e8bd339fdba1afabc0 \
+                    sha256  bb7bc735e6813b177dcfccd480defcde7eddefa173b5967eac11babd1bfa98e8
 
 depends_lib-append  port:gdbm
 
 patchfiles          patch-Configure.diff \
-                    patch-handy.h.stdbool.diff
+                    patch-handy.h.stdbool.diff \
+                    patch-perl.h.diff
 
 platform darwin {
     patchfiles-append   patch-hints_darwin.sh.diff
@@ -84 +84 @@
 if {${os.platform} eq "darwin"} {
     set platsuffix "-2level"
 }
-configure.args-append "-D inc_version_list=\"5.16.0/${os.platform}-thread-multi${platsuffix} 5.16.0 \""
+configure.args-append "-D inc_version_list=\"5.16.1/${os.platform}-thread-multi${platsuffix} 5.16.1 5.16.0/${os.platform}-thread-multi${platsuffix} 5.16.0\""
 
 if {[variant_isset universal]} {
     post-configure {

files/patch-perl.h.diff

@@ +1 @@
+--- perl.h.orig
++++ perl.h
+@@ -359,7 +359,11 @@
+ /* Rats: if dTHR is just blank then the subsequent ";" throws an error */
+ /* Declaring a *function*, instead of a variable, ensures that we don't rely
+    on being able to suppress "unused" warnings.  */
++#ifdef __cplusplus
++#define dNOOP (void)0
++#else
+ #define dNOOP extern int Perl___notused(void)
++#endif
+ 
+ #ifndef pTHX
+ /* Don't bother defining tTHX and sTHX; using them outside