X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Fautovivification.git;a=blobdiff_plain;f=autovivification.xs;h=0a7330ee3af30d89278b60b8404e0c810300ac71;hp=915811487d3c2f814423b4be023121fea3d3365e;hb=87286831234d1bff560036f1ae04f7924704073c;hpb=77f5401407e2c26619e5499a1539564c59dc83e2 diff --git a/autovivification.xs b/autovivification.xs index 9158114..0a7330e 100644 --- a/autovivification.xs +++ b/autovivification.xs @@ -869,7 +869,7 @@ static SV *a_do_fake_pp_unop_arg1(pTHX_ U32 type, U32 flags, SV *arg) { PUSHs(arg); PUTBACK; - return a_do_fake_pp(&unop); + return a_do_fake_pp((OP *) &unop); } static SV *a_do_fake_pp_unop_arg2(pTHX_ U32 type, U32 flags, SV *arg1, SV *arg2) { @@ -884,7 +884,7 @@ static SV *a_do_fake_pp_unop_arg2(pTHX_ U32 type, U32 flags, SV *arg1, SV *arg2) PUSHs(arg2); PUTBACK; - return a_do_fake_pp(&unop); + return a_do_fake_pp((OP *) &unop); } #define a_do_pp_rv2av(R) a_do_fake_pp_unop_arg1(OP_RV2AV, OPf_REF, (R))