X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FSub-Op.git;a=blobdiff_plain;f=Op.xs;h=ba33ea64b18c43d966768bcfc72a20d28ea43497;hp=5c9413b18afdeb95f7e69f654532d2649d45ee15;hb=a64f1396138777dcc234bef8dd2a964164077061;hpb=0661466030b3dd0fb805da10aaed883fbe931093 diff --git a/Op.xs b/Op.xs index 5c9413b..ba33ea6 100644 --- a/Op.xs +++ b/Op.xs @@ -177,8 +177,6 @@ STATIC IV sub_op_hint(pTHX) { STATIC OP *(*sub_op_old_ck_entersub)(pTHX_ OP *) = 0; STATIC OP *sub_op_ck_entersub(pTHX_ OP *o) { - dMY_CXT; - o = CALL_FPTR(sub_op_old_ck_entersub)(aTHX_ o); if (sub_op_hint()) {