[packages/perl-Coro] Up to 6.51.1
mmazur
mmazur at pld-linux.org
Fri May 19 15:46:34 CEST 2017
commit 6c1092f95df7fc0cd0dc09b1c4c9c63259965c1c
Author: Mariusz Mazur <mmazur at pld-linux.org>
Date: Fri May 19 15:46:24 2017 +0200
Up to 6.51.1
coro-5.24.patch | 21 +++++++++++++++++++++
perl-Coro.spec | 13 ++++++++-----
2 files changed, 29 insertions(+), 5 deletions(-)
---
diff --git a/perl-Coro.spec b/perl-Coro.spec
index e36cae9..371ff39 100644
--- a/perl-Coro.spec
+++ b/perl-Coro.spec
@@ -5,17 +5,19 @@
%include /usr/lib/rpm/macros.perl
%define pdir Coro
%define pnam Coro
+%define pver 6.511
Summary: Coro - do events the coro-way
Summary(pl.UTF-8): Coro - obsługa zdarzeń na sposób coro
Name: perl-Coro
-Version: 6.41
-Release: 4
+Version: 6.51.1
+Release: 1
# same as perl
License: GPL v1+ or Artistic
Group: Development/Languages/Perl
-Source0: http://www.cpan.org/modules/by-authors/id/M/ML/MLEHMANN/%{pnam}-%{version}.tar.gz
-# Source0-md5: 882b3606487db94b35ac309bc7025009
+Source0: http://www.cpan.org/modules/by-authors/id/M/ML/MLEHMANN/%{pnam}-%{pver}.tar.gz
+# Source0-md5: bcad7051f573fed680eaf72e64e2140e
Patch0: kill-blocked-test.patch
+Patch1: coro-5.24.patch
URL: http://search.cpan.org/dist/Coro/
BuildRequires: perl-AnyEvent >= 2:5.0
BuildRequires: perl-EV >= 1:4.0
@@ -49,8 +51,9 @@ Ten moduł pozwala na tworzenie programów przy użyciu potężnego modelu
wątkowych programów.
%prep
-%setup -q -n %{pnam}-%{version}
+%setup -q -n %{pnam}-%{pver}
%patch0 -p1
+%patch1 -p1
%{__sed} -i "s^/opt/bin/perl^%{_bindir}/perl^" Coro/jit*pl
diff --git a/coro-5.24.patch b/coro-5.24.patch
new file mode 100644
index 0000000..86394fc
--- /dev/null
+++ b/coro-5.24.patch
@@ -0,0 +1,21 @@
+Description: fix for Coro with 5.24
+Origin: https://paste.debian.net/688072
+Bug-Debian: https://bugs.debian.org/838851
+Bug: https://rt.cpan.org/Public/Bug/Display.html?id=114708
+Author: Anonymous
+Last-Update: 2016-09-25
+
+--- 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);
================================================================
---- gitweb:
http://git.pld-linux.org/gitweb.cgi/packages/perl-Coro.git/commitdiff/6c1092f95df7fc0cd0dc09b1c4c9c63259965c1c
More information about the pld-cvs-commit
mailing list