diff options
author | Daniel Chetlin <daniel@chetlin.com> | 2000-12-23 20:09:49 -0800 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-12-28 22:09:25 +0000 |
commit | 6fccc2c0549384406273ef308cca1293d0f3aa37 (patch) | |
tree | 38760239fa9f922ba5ca3189227159badd3f1d3d /mg.c | |
parent | dc917a9d6b95a9949b35e1402917f446df533aca (diff) | |
download | perl-6fccc2c0549384406273ef308cca1293d0f3aa37.tar.gz |
Re: [PATCH blead] Fix segfault in gv_handler/mg_find
Message-ID: <20001224040949.B3090@darkstar>
p4raw-id: //depot/perl@8236
Diffstat (limited to 'mg.c')
-rw-r--r-- | mg.c | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -261,6 +261,8 @@ MAGIC* Perl_mg_find(pTHX_ SV *sv, int type) { MAGIC* mg; + if (!sv) + return 0; for (mg = SvMAGIC(sv); mg; mg = mg->mg_moremagic) { if (mg->mg_type == type) return mg; |