In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/9349a6bbb9de151e5385038b962ceff7c7278b53?hp=b173165cb2425ea00a041490534260cd10909456>

- Log -----------------------------------------------------------------
commit 9349a6bbb9de151e5385038b962ceff7c7278b53
Author: Steffen Mueller <smuel...@cpan.org>
Date:   Fri Dec 5 17:23:55 2014 +0100

    Remove branch seemingly untaken
    
    An HV* that is not an SVt_PVHV? Maybe I don't have sufficient fantasy.
    This branch goes back to 1994, so things have changed ... a bit since
    then.
-----------------------------------------------------------------------

Summary of changes:
 pp_hot.c | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/pp_hot.c b/pp_hot.c
index 35493eb..1550de5 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -1790,8 +1790,7 @@ PP(pp_helem)
     const bool localizing = PL_op->op_private & OPpLVAL_INTRO;
     bool preeminent = TRUE;
 
-    if (SvTYPE(hv) != SVt_PVHV)
-       RETPUSHUNDEF;
+    assert(SvTYPE(hv) != SVt_PVHV);
 
     if (localizing) {
        MAGIC *mg;

--
Perl5 Master Repository

Reply via email to