diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2013-06-08 00:23:02 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2013-06-08 00:23:02 -0700 |
| commit | e39b51c67c54580003211fdb07a0c0f50113c6d1 (patch) | |
| tree | 1a50cbef13323637ee363424fcdcf735367c029f /sv.c | |
| parent | 434f489be7a3ec92b6d20b3474a9eee71a87e2a1 (diff) | |
| download | perl-e39b51c67c54580003211fdb07a0c0f50113c6d1.tar.gz | |
[perl #117941] reset crashes when current stash is freed
Diffstat (limited to 'sv.c')
| -rw-r--r-- | sv.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -8982,7 +8982,7 @@ Perl_sv_resetpvn(pTHX_ const char *s, STRLEN len, HV * const stash) char todo[PERL_UCHAR_MAX+1]; const char *send; - if (!stash) + if (!stash || SvTYPE(stash) != SVt_PVHV) return; if (!s) { /* reset ?? searches */ |