diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-03-08 16:12:29 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-03-08 16:12:29 +0000 |
| commit | b979de87f60b43f7673e6a7e8947db2dc281aed0 (patch) | |
| tree | e14d74379c7ad0becd0d2eefc67bd6c9a730ef7a /hv.h | |
| parent | 67261566773bc3c68100784bb02fb0dc880102ec (diff) | |
| download | perl-b979de87f60b43f7673e6a7e8947db2dc281aed0.tar.gz | |
Warning fix. Since HePV's second argument is supposed
to be an unsigned integer, there's not point in comparing
it to 0.
p4raw-id: //depot/perl@30519
Diffstat (limited to 'hv.h')
| -rw-r--r-- | hv.h | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -303,8 +303,7 @@ C<SV*>. #define HeHASH(he) HEK_HASH(HeKEY_hek(he)) #define HePV(he,lp) ((HeKLEN(he) == HEf_SVKEY) ? \ SvPV(HeKEY_sv(he),lp) : \ - (((lp = HeKLEN(he)) >= 0) ? \ - HeKEY(he) : NULL)) + ((lp = HeKLEN(he)) >= 0)) \ #define HeSVKEY(he) ((HeKEY(he) && \ HeKLEN(he) == HEf_SVKEY) ? \ |