From 5e14de0ddd91a58504762bfb0f8331a507ea97a2 Mon Sep 17 00:00:00 2001
From: Silvan Calarco <silvan.calarco@mambasoft.it>
Date: Sat, 6 Jan 2024 08:44:19 +0100
Subject: [PATCH] update to 6.511 [release 6.511-1mamba;Sun Nov 13 2016]

---
 perl-Coro-6.511-perl-5.24.patch | 14 ++++++++++++++
 perl-Coro.spec                  |  9 +++++++--
 2 files changed, 21 insertions(+), 2 deletions(-)
 create mode 100644 perl-Coro-6.511-perl-5.24.patch

diff --git a/perl-Coro-6.511-perl-5.24.patch b/perl-Coro-6.511-perl-5.24.patch
new file mode 100644
index 0000000..819da96
--- /dev/null
+++ b/perl-Coro-6.511-perl-5.24.patch
@@ -0,0 +1,14 @@
+--- a/Coro/State.xs
++++ b/Coro/State.xs
+@@ -1412,7 +1412,11 @@
+                           PUSHMARK (SP);
+                           PUSHs (&PL_sv_yes);
+                           PUSHs (fullname);
++# if PERL_VERSION_ATLEAST(5,24,0)
++                          PUSHs (CxHASARGS (cx) ? sv_2mortal (newRV_inc (PL_curpad[0])) : &PL_sv_undef);
++#else
+                           PUSHs (CxHASARGS (cx) ? sv_2mortal (newRV_inc ((SV *)cx->blk_sub.argarray)) : &PL_sv_undef);
++#endif
+                           PUTBACK;
+                           cb = hv_fetch ((HV *)SvRV (coro_current), "_trace_sub_cb", sizeof ("_trace_sub_cb") - 1, 0);
+                           if (cb) call_sv (*cb, G_KEEPERR | G_EVAL | G_VOID | G_DISCARD);
\ No newline at end of file
diff --git a/perl-Coro.spec b/perl-Coro.spec
index 5a0b830..91eeb33 100644
--- a/perl-Coro.spec
+++ b/perl-Coro.spec
@@ -1,16 +1,17 @@
 %define perl_major_ver %(eval `perl -V:version`; echo ${version%*.[0-9]*}.0)
 
 Name:          perl-Coro
-Version:       6.42
+Version:       6.511
 Release:       1mamba
 Summary:       Coro - the only real threads in perl
 Group:         System/Libraries/Perl
 Vendor:        openmamba
 Distribution:  openmamba
-Packager:      Automatic Build System <autodist@mambasoft.it>
+Packager:      Silvan Calarco <silvan.calarco@mambasoft.it>
 URL:           http://www.cpan.org
 Source:        http://search.cpan.org/CPAN/authors/id/M/ML/MLEHMANN/Coro-%{version}.tar.gz
 Patch0:        perl-Coro-5.25-ucontext-default.patch
+Patch1:        perl-Coro-6.511-perl-5.24.patch
 License:       GPL, Artistic
 ## AUTOBUILDREQ-BEGIN
 BuildRequires: glibc-devel
@@ -41,6 +42,7 @@ This module collection manages continuations in general, most often in the form
 %prep
 %setup -q -n Coro-%{version}
 %patch0 -p1
+%patch1 -p1
 
 sed -i -e '/^#!/ s|.*|#!%{__perl}|' eg/myhttpd Coro/jit-*-unix.pl
 
@@ -77,6 +79,9 @@ chmod -R u+w %{buildroot}/*
 # README README.linux-glibc doc/* eg
 
 %changelog
+* Sun Nov 13 2016 Silvan Calarco <silvan.calarco@mambasoft.it> 6.511-1mamba
+- update to 6.511
+
 * Sat Feb 14 2015 Automatic Build System <autodist@mambasoft.it> 6.42-1mamba
 - automatic update by autodist