summaryrefslogtreecommitdiff
path: root/mg.c
diff options
context:
space:
mode:
authorTassilo von Parseval <tassilo.parseval@post.rwth-aachen.de>2003-12-08 09:17:46 +0100
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2003-12-08 07:37:27 +0000
commitdf8c69647dfe89de227fd81e7ece25070f8b880e (patch)
tree91af5b45e56a612afce027e51645bd6b8e70dc72 /mg.c
parent988e6e7e0f6b44b3b1bb6149117affb3c43e8600 (diff)
downloadperl-df8c69647dfe89de227fd81e7ece25070f8b880e.tar.gz
iterator reset moved to hv.c (was: [PATCH] SCALAR/FIRSTKEY for tied hashes in scalar context)
Message-id: <20031208071746.GA594@ethan> p4raw-id: //depot/perl@21869
Diffstat (limited to 'mg.c')
-rw-r--r--mg.c5
1 files changed, 0 insertions, 5 deletions
diff --git a/mg.c b/mg.c
index 2529ff7793..7955e52003 100644
--- a/mg.c
+++ b/mg.c
@@ -1539,11 +1539,6 @@ Perl_magic_wipepack(pTHX_ SV *sv, MAGIC *mg)
POPSTACK;
LEAVE;
- if (SvTYPE(sv) == SVt_PVHV)
- /* must reset iterator otherwise Perl_magic_scalarpack
- * wont report a false value on a cleared hash */
- HvEITER((HV*)sv) = NULL;
-
return 0;
}