diff options
author | Nicholas Clark <nick@ccl4.org> | 2008-04-17 12:47:39 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2008-04-17 12:47:39 +0000 |
commit | eff494dd14cc5afe1a584bb7e0000a62b81acc19 (patch) | |
tree | d8fe8284ac63f47c43d9d4126f903c54e64f778c /gv.c | |
parent | 37698ac13e6c088d690d4d7ee5635c83f340f956 (diff) | |
download | perl-eff494dd14cc5afe1a584bb7e0000a62b81acc19.tar.gz |
Perl_gv_fetchmethod{,_autoload,_flags} are actually never* called with
a non-NULL stash. So change the parameter to NN.
* Fixed the one really obscure hitherto untested case.
p4raw-id: //depot/perl@33706
Diffstat (limited to 'gv.c')
-rw-r--r-- | gv.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -622,7 +622,7 @@ Perl_gv_fetchmethod_flags(pTHX_ HV *stash, const char *name, U32 flags) PERL_ARGS_ASSERT_GV_FETCHMETHOD_AUTOLOAD; - if (stash && SvTYPE(stash) < SVt_PVHV) + if (SvTYPE(stash) < SVt_PVHV) stash = NULL; for (nend = name; *nend; nend++) { |