diff options
author | Nicholas Clark <nick@ccl4.org> | 2006-02-07 15:52:18 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2006-02-07 15:52:18 +0000 |
commit | a4a772887f4f3b784d817fd0589ea0a4e83d9549 (patch) | |
tree | 218adb7efba7d0ac1767a8091a125eb20a160f71 /pp.c | |
parent | 8a67133af1a8b4ca80620b04a96f9024962c85dc (diff) | |
download | perl-a4a772887f4f3b784d817fd0589ea0a4e83d9549.tar.gz |
Avoid gcc warning about possibly uninitialised variables.
p4raw-id: //depot/perl@27123
Diffstat (limited to 'pp.c')
-rw-r--r-- | pp.c | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -3146,9 +3146,8 @@ PP(pp_index) } } } - if (!is_index) { - tmps2 = SvPV_const(little, llen); - } + /* Don't actually need the NULL initialisation, but it keeps gcc quiet. */ + tmps2 = is_index ? NULL : SvPV_const(little, llen); tmps = SvPV_const(big, biglen); if (MAXARG < 3) |