From: David Mitchell Date: Thu, 13 Dec 2012 13:24:58 +0000 (+0000) Subject: B.xs: silence clang warning X-Git-Tag: upstream/5.20.0~4499 X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=71446f2da4f4887cb6b60b4ddee4754faee70d3d;p=platform%2Fupstream%2Fperl.git B.xs: silence clang warning PADOFFSET is unsigned, so checking that it's >= 0 is pointless. --- diff --git a/ext/B/B.xs b/ext/B/B.xs index 1a6e257..bf7e9b1 100644 --- a/ext/B/B.xs +++ b/ext/B/B.xs @@ -1942,7 +1942,7 @@ PadlistARRAYelt(padlist, idx) B::PADLIST padlist PADOFFSET idx PPCODE: - if (idx >= 0 && PadlistMAX(padlist) >= 0 + if (PadlistMAX(padlist) >= 0 && idx <= PadlistMAX(padlist)) XPUSHs(make_sv_object(aTHX_ (SV *)PadlistARRAY(padlist)[idx]));