CVS commit: pkgsrc/devel/p5-EV

["Thomas Klausner" <wiz%netbsd.org@localhost>]

Module Name:    pkgsrc
Committed By:   wiz
Date:           Fri Jul  4 17:33:12 UTC 2025

Modified Files:
        pkgsrc/devel/p5-EV: distinfo
Added Files:
        pkgsrc/devel/p5-EV/patches: patch-typemap

Log Message:
p5-EV: fix build with perl 5.42 using proposed upstream patch


To generate a diff of this commit:
cvs rdiff -u -r1.24 -r1.25 pkgsrc/devel/p5-EV/distinfo
cvs rdiff -u -r0 -r1.1 pkgsrc/devel/p5-EV/patches/patch-typemap

Please note that diffs are not public domain; they are subject to the
copyright notices on the relevant files.

Modified files:

Index: pkgsrc/devel/p5-EV/distinfo
diff -u pkgsrc/devel/p5-EV/distinfo:1.24 pkgsrc/devel/p5-EV/distinfo:1.25
--- pkgsrc/devel/p5-EV/distinfo:1.24    Sat Dec 16 11:09:59 2023
+++ pkgsrc/devel/p5-EV/distinfo Fri Jul  4 17:33:12 2025
@@ -1,6 +1,7 @@
-$NetBSD: distinfo,v 1.24 2023/12/16 11:09:59 mef Exp $
+$NetBSD: distinfo,v 1.25 2025/07/04 17:33:12 wiz Exp $
 
 BLAKE2s (EV-4.34.tar.gz) = d8144fb69e96891a567be0a6a89dc170ce80453274de45499a2a3816752c605a
 SHA512 (EV-4.34.tar.gz) = 938f675ec960be40ebe98416450b2d8866581250560b4b6781cd36926e360ab2b3f8d4cc39145ed068753b9952e5c220316cefd4d99a6ca63c2bfde56329306e
 Size (EV-4.34.tar.gz) = 220047 bytes
 SHA1 (patch-libev_ev.h) = 4a64abdc7d4d936623ad7a6a68195bf65218e1ed
+SHA1 (patch-typemap) = 9e5dc3bae048575076e8f8a93798fffcc8a7b11b

Added files:

Index: pkgsrc/devel/p5-EV/patches/patch-typemap
diff -u /dev/null pkgsrc/devel/p5-EV/patches/patch-typemap:1.1
--- /dev/null   Fri Jul  4 17:33:12 2025
+++ pkgsrc/devel/p5-EV/patches/patch-typemap    Fri Jul  4 17:33:12 2025
@@ -0,0 +1,20 @@
+$NetBSD: patch-typemap,v 1.1 2025/07/04 17:33:12 wiz Exp $
+
+Fix build with perl 5.42.
+https://github.com/Perl/perl5/issues/22353
+
+--- typemap.orig       2010-10-29 18:42:23.000000000 +0000
++++ typemap
+@@ -37,9 +37,9 @@ T_LOOP
+ 
+ T_WATCHER
+       if (!(SvROK ($arg) && SvOBJECT (SvRV ($arg))
+-              && (SvSTASH (SvRV ($arg)) == stash_" . ($type =~ /ev_(\S+)/, "$1") . "
+-                  || sv_derived_from ($arg, \"EV::" . ($type =~ /ev_(\S+)/, ucfirst "$1") . "\"))))
+-          croak (\"object is not of type EV::" . ($type =~ /ev_(\S+)/, ucfirst "$1") . "\");
++              && (SvSTASH (SvRV ($arg)) == stash_${ ($type =~ /ev_(\S+)/, \qq{$1}) }
++                  || sv_derived_from ($arg, \"EV::${ ($type =~ /ev_(\S+)/, \ucfirst qq{$1}) }\"))))
++          croak (\"object is not of type EV::${ ($type =~ /ev_(\S+)/, \ucfirst qq{$1}) }\");
+       $var = ($type)SvPVX (SvRV ($arg));
+ 
+ OUTPUT