diff options
author | Nicholas Clark <nick@ccl4.org> | 2006-05-09 19:31:04 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2006-05-09 19:31:04 +0000 |
commit | a9fd4e40a4a3d556fd6cc1922cda2d372d2f7dbe (patch) | |
tree | 6e8eb80c37231dc64831bf34988b53020a7dfa11 /gv.c | |
parent | b56fc9ec2d9f24dd7719ac8ba4c094aaa486bd0e (diff) | |
download | perl-a9fd4e40a4a3d556fd6cc1922cda2d372d2f7dbe.tar.gz |
Gv_AMupdate() always creates magic, so mg can never be NULL.
p4raw-id: //depot/perl@28143
Diffstat (limited to 'gv.c')
-rw-r--r-- | gv.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -1601,6 +1601,7 @@ Perl_gv_handler(pTHX_ HV *stash, I32 id) Gv_AMupdate(stash); mg = mg_find((SV*)stash, PERL_MAGIC_overload_table); } + assert(mg); amtp = (AMT*)mg->mg_ptr; if ( amtp->was_ok_am != PL_amagic_generation || amtp->was_ok_sub != PL_sub_generation ) |