summaryrefslogtreecommitdiff
path: root/pp_hot.c
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2008-02-14 14:39:21 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2008-02-14 14:39:21 +0000
commit7e623da313ab504bf323b0f65cb47dca22423be3 (patch)
tree8f6d504dfcf5e6d279d6c46542280b6fc1b7793e /pp_hot.c
parentc91c3a7516528643b435e162ebf2189b64c15290 (diff)
downloadperl-7e623da313ab504bf323b0f65cb47dca22423be3.tar.gz
Revert change #33302. This change was wrong, since it was
using OP_ENTERSUB as a LISTOP, whereas it's a UNOP. p4raw-link: @33302 on //depot/perl: 781e3f050073176aa21ffc243184a1cb57f4ec92 p4raw-id: //depot/perl@33307
Diffstat (limited to 'pp_hot.c')
-rw-r--r--pp_hot.c10
1 files changed, 2 insertions, 8 deletions
diff --git a/pp_hot.c b/pp_hot.c
index 61324bfc80..cd1a885f67 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -2735,14 +2735,9 @@ PP(pp_entersub)
}
/* should call AUTOLOAD now? */
else {
-try_autoload:
- {
- const bool is_method = cLISTOP->op_last &&
- (cLISTOP->op_last->op_type == OP_METHOD_NAMED ||
- cLISTOP->op_last->op_type == OP_METHOD);
-
+try_autoload:
if ((autogv = gv_autoload4(GvSTASH(gv), GvNAME(gv), GvNAMELEN(gv),
- is_method)))
+ FALSE)))
{
cv = GvCV(autogv);
}
@@ -2752,7 +2747,6 @@ try_autoload:
gv_efullname3(sub_name, gv, NULL);
DIE(aTHX_ "Undefined subroutine &%"SVf" called", SVfARG(sub_name));
}
- }
}
if (!cv)
DIE(aTHX_ "Not a CODE reference");