diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-11-11 10:32:54 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-11-11 10:32:54 +0000 |
| commit | 11faa288e292c27cb2ddc4ccdc483b523d26ce19 (patch) | |
| tree | cdd7a04e7b75f54261ca8d31b5dbd98d7053dd10 /pp_hot.c | |
| parent | 57843af05bc7863df9b9bfb6b37e3a29d08532a9 (diff) | |
| download | perl-11faa288e292c27cb2ddc4ccdc483b523d26ce19.tar.gz | |
avoid stash pointers in optree under USE_ITHREADS
p4raw-id: //depot/perl@4546
Diffstat (limited to 'pp_hot.c')
| -rw-r--r-- | pp_hot.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -2778,7 +2778,7 @@ S_method_common(pTHX_ SV* meth, U32* hashp) sep = p, leaf = p + 2; } if (!sep || ((sep - name) == 5 && strnEQ(name, "SUPER", 5))) { - packname = HvNAME(sep ? PL_curcop->cop_stash : stash); + packname = sep ? CopSTASHPV(PL_curcop) : HvNAME(stash); packlen = strlen(packname); } else { |