rpm/perl
SHA256
1
0
Fork 0
forked from pool/perl
Code Pull Requests Activity
18dfe2bd8e
perl/perl-5.18.2-overflow.diff

12 lines
587 B
Diff
Raw Normal View History

Accepting request 227434 from home:rguenther:branches:devel:languages:perl - perl-5.18.2-overflow.diff: avoid undefined overflow in S_sv_2iuv_common OBS-URL: https://build.opensuse.org/request/show/227434 OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl?expand=0&rev=108
2014-03-25 13:21:43 +01:00
--- sv.c.bak 2014-03-24 15:11:48.007595042 +0100
+++ sv.c 2014-03-25 11:57:41.154752451 +0100
Accepting request 313011 from home:hsk17:branches:devel:languages:perl update to 5.22.0 regarding the .spec file: i have updated the "(Provides|Obsoletes): perl-*" directives to reflect the module versions provided by perl-5.22.0. but only for the modules that already were mentioned in the .spec file. i cannot judge why these are in the .spec file while many others are not. OBS-URL: https://build.opensuse.org/request/show/313011 OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl?expand=0&rev=130
2015-06-23 21:23:16 +02:00
@@ -2175,7 +2175,7 @@ S_sv_2iuv_common(pTHX_ SV *const sv)
Accepting request 227434 from home:rguenther:branches:devel:languages:perl - perl-5.18.2-overflow.diff: avoid undefined overflow in S_sv_2iuv_common OBS-URL: https://build.opensuse.org/request/show/227434 OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl?expand=0&rev=108
2014-03-25 13:21:43 +01:00
#ifndef NV_PRESERVES_UV
Accepting request 313011 from home:hsk17:branches:devel:languages:perl update to 5.22.0 regarding the .spec file: i have updated the "(Provides|Obsoletes): perl-*" directives to reflect the module versions provided by perl-5.22.0. but only for the modules that already were mentioned in the .spec file. i cannot judge why these are in the .spec file while many others are not. OBS-URL: https://build.opensuse.org/request/show/313011 OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl?expand=0&rev=130
2015-06-23 21:23:16 +02:00
&& SvIVX(sv) != IV_MIN /* avoid negating IV_MIN below */
Accepting request 227434 from home:rguenther:branches:devel:languages:perl - perl-5.18.2-overflow.diff: avoid undefined overflow in S_sv_2iuv_common OBS-URL: https://build.opensuse.org/request/show/227434 OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl?expand=0&rev=108
2014-03-25 13:21:43 +01:00
&& (((UV)1 << NV_PRESERVES_UV_BITS) >
- (UV)(SvIVX(sv) > 0 ? SvIVX(sv) : -SvIVX(sv)))
adapt overflow patch OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl?expand=0&rev=109
2014-03-25 13:23:10 +01:00
+ (UV)(SvIVX(sv) > 0 ? (UV)SvIVX(sv) : -(UV)SvIVX(sv)))
Accepting request 227434 from home:rguenther:branches:devel:languages:perl - perl-5.18.2-overflow.diff: avoid undefined overflow in S_sv_2iuv_common OBS-URL: https://build.opensuse.org/request/show/227434 OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl?expand=0&rev=108
2014-03-25 13:21:43 +01:00
/* Don't flag it as "accurately an integer" if the number
came from a (by definition imprecise) NV operation, and
we're outside the range of NV integer precision */
Copy Permalink