hv.c: fixup args assert for HV_FREE_ENTRIES
authorYves Orton <demerphq@gmail.com>
Sat, 1 Jul 2017 14:40:24 +0000 (16:40 +0200)
committerYves Orton <demerphq@gmail.com>
Sat, 1 Jul 2017 14:40:24 +0000 (16:40 +0200)
hv.c

diff --git a/hv.c b/hv.c
index 61f1f8f..3da7910 100644 (file)
--- a/hv.c
+++ b/hv.c
@@ -1857,7 +1857,7 @@ S_hv_free_entries(pTHX_ HV *hv)
     XPVHV * const xhv = (XPVHV*)SvANY(hv);
     SV *sv;
 
-    PERL_ARGS_ASSERT_HFREEENTRIES;
+    PERL_ARGS_ASSERT_HV_FREE_ENTRIES;
 
     while ((sv = Perl_hfree_next_entry(aTHX_ hv, &index))||xhv->xhv_keys) {
        SvREFCNT_dec(sv);