diff options
| author | David Mitchell <davem@iabyn.com> | 2012-12-13 13:24:58 +0000 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2012-12-13 14:19:35 +0000 |
| commit | 71446f2da4f4887cb6b60b4ddee4754faee70d3d (patch) | |
| tree | 0fefd07964978754a7407d400d2e9e43b6e6844a /ext/B | |
| parent | a1031b54ebc2b462f22b6a16de6b6f52913da89a (diff) | |
| download | perl-71446f2da4f4887cb6b60b4ddee4754faee70d3d.tar.gz | |
B.xs: silence clang warning
PADOFFSET is unsigned, so checking that it's >= 0 is pointless.
Diffstat (limited to 'ext/B')
| -rw-r--r-- | ext/B/B.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/B/B.xs b/ext/B/B.xs index 1a6e257f29..bf7e9b12f0 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])); |