summaryrefslogtreecommitdiff
path: root/hv.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-03-05 09:04:52 +0000
committerGurusamy Sarathy <gsar@cpan.org>2000-03-05 09:04:52 +0000
commit155aba94f677ac771761a1f510964fe5b21524ed (patch)
tree80d7d14e42ed27cbd9bafcea2c1f10a54bf150a3 /hv.c
parentb21babef0dc893282c08080aa99c4bd760e05204 (diff)
downloadperl-155aba94f677ac771761a1f510964fe5b21524ed.tar.gz
fixes for most warnings identified by gcc -Wall
p4raw-id: //depot/perl@5540
Diffstat (limited to 'hv.c')
-rw-r--r--hv.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/hv.c b/hv.c
index fd2c2d7c6f..44d37e34d3 100644
--- a/hv.c
+++ b/hv.c
@@ -1044,7 +1044,7 @@ Perl_newHVhv(pTHX_ HV *ohv)
/* Slow way */
hv_iterinit(ohv);
- while (entry = hv_iternext(ohv)) {
+ while ((entry = hv_iternext(ohv))) {
hv_store(hv, HeKEY(entry), HeKLEN(entry),
SvREFCNT_inc(HeVAL(entry)), HeHASH(entry));
}
@@ -1238,7 +1238,7 @@ Perl_hv_iternext(pTHX_ HV *hv)
xhv = (XPVHV*)SvANY(hv);
oldentry = entry = xhv->xhv_eiter;
- if (mg = SvTIED_mg((SV*)hv, 'P')) {
+ if ((mg = SvTIED_mg((SV*)hv, 'P'))) {
SV *key = sv_newmortal();
if (entry) {
sv_setsv(key, HeSVKEY_force(entry));