assert(arg) before derefing it since it can be NULL.

Coverity CID 104813.

1 files changed, 10 insertions, 7 deletions

diff --git a/pp.c b/pp.c
index d6fe789b0a..af2270e131 100644
--- a/pp.c
+++ b/pp.c
@@ -6418,13 +6418,16 @@ PP(pp_lvref)
 	mg->mg_flags |= MGf_PERSIST;
     if (UNLIKELY(PL_op->op_private & OPpLVAL_INTRO)) {
       if (elem) {
-	MAGIC *mg;
-	HV *stash;
-	const bool can_preserve = SvCANEXISTDELETE(arg);
-	if (SvTYPE(arg) == SVt_PVAV)
-	    S_localise_aelem_lval(aTHX_ (AV *)arg, elem, can_preserve);
-	else
-	    S_localise_helem_lval(aTHX_ (HV *)arg, elem, can_preserve);
+        MAGIC *mg;
+        HV *stash;
+        assert(arg);
+        {
+            const bool can_preserve = SvCANEXISTDELETE(arg);
+            if (SvTYPE(arg) == SVt_PVAV)
+              S_localise_aelem_lval(aTHX_ (AV *)arg, elem, can_preserve);
+            else
+              S_localise_helem_lval(aTHX_ (HV *)arg, elem, can_preserve);
+        }
       }
       else if (arg) {
 	S_localise_gv_slot(aTHX_ (GV *)arg,