summaryrefslogtreecommitdiff
path: root/hv.c
diff options
context:
space:
mode:
authorAndy Lester <andy@petdance.com>2005-06-06 05:11:07 -0500
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2005-06-07 17:03:16 +0000
commit66a1b24beb76ea873ad4caa57ee3ab9df945afbf (patch)
treee59a6ec85d3a4225104f0176749497fb46256961 /hv.c
parentf681a178ed5ab9eaae71b97c6eea3744c0304d67 (diff)
downloadperl-66a1b24beb76ea873ad4caa57ee3ab9df945afbf.tar.gz
Random cleanups #47
Message-ID: <20050606151107.GC7022@petdance.com> p4raw-id: //depot/perl@24735
Diffstat (limited to 'hv.c')
-rw-r--r--hv.c2
1 files changed, 0 insertions, 2 deletions
diff --git a/hv.c b/hv.c
index f418972303..2b00650fe7 100644
--- a/hv.c
+++ b/hv.c
@@ -1767,12 +1767,10 @@ value, you can get it through the macro C<HvFILL(tb)>.
I32
Perl_hv_iterinit(pTHX_ HV *hv)
{
- register XPVHV* xhv;
HE *entry;
if (!hv)
Perl_croak(aTHX_ "Bad hash");
- xhv = (XPVHV*)SvANY(hv);
if (SvOOK(hv)) {
struct xpvhv_aux *iter = HvAUX(hv);