X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pp.c;h=cc3f7ebf06dbbd2a2cae7dbc865ea6222ddeca6e;hb=166ba93a1fec772f3361313ea39edfd35f4086f1;hp=6d77ca1bfa70a72acba3ef5dfd0a2e14694a2be3;hpb=dcad28805702d580064bc39a267d63c58bbb3b3f;p=p5sagit%2Fp5-mst-13.2.git diff --git a/pp.c b/pp.c index 6d77ca1..cc3f7eb 100644 --- a/pp.c +++ b/pp.c @@ -1566,7 +1566,7 @@ PP(pp_i_add) { djSP; dATARGET; tryAMAGICbin(add,opASSIGN); { - dPOPTOPiirl; + dPOPTOPiirl_ul; SETi( left + right ); RETURN; } @@ -1576,7 +1576,7 @@ PP(pp_i_subtract) { djSP; dATARGET; tryAMAGICbin(subtr,opASSIGN); { - dPOPTOPiirl; + dPOPTOPiirl_ul; SETi( left - right ); RETURN; }