Fix bad assertions in pp_ctl.c:pp_caller

If a stash is freed or undefined by code that it calls, then pp_caller
can encounter a freed stash or nameless stash.  HvNAME_HEK returns
null for a freed scalar and for a hash without a name.  So CopSTASHPV
will also be null in that case, which is expected.  If the hash is
undefined, it may not be SvOOK any more, and if it is freed it defi-
nitely won’t be.

The following code *does* assume, however that CopSTASH is non-null,
so assert that.

1 files changed, 1 insertions, 2 deletions

diff --git a/pp_ctl.c b/pp_ctl.c
index 2ccd8127a8..b2ab8a5235 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -1891,8 +1891,7 @@ PP(pp_caller)
     }
 
     DEBUG_CX("CALLER");
-    assert(CopSTASHPV(cx->blk_oldcop));
-    assert(SvOOK((HV*)CopSTASH(cx->blk_oldcop)));
+    assert(CopSTASH(cx->blk_oldcop));
     stash_hek = HvNAME_HEK((HV*)CopSTASH(cx->blk_oldcop));
     if (GIMME != G_ARRAY) {
         EXTEND(SP, 1);