On Sun, 19 Aug 2001, Bart Lateur wrote:
> On Sun, 19 Aug 2001 20:45:45 +0200 (CEST), BooK wrote:
>
> >All of those (except one or two jokes, like the COBOL one) simply do the
> >equivalent of $A++... (that is, add 1 to $A)
>
> So shouldn't the name be "YAA++"? Ok, let's name the variable $H, and
> let's do ++$H instead... tha makes it a YAPPH.
Actually, it's already doing ++$H. See op.c, lines 1177 to 1185, in
function Perl_scalarvoid():
case OP_POSTINC:
o->op_type = OP_PREINC; /* pre-increment is faster */
o->op_ppaddr = PL_ppaddr[OP_PREINC];
break;
case OP_POSTDEC:
o->op_type = OP_PREDEC; /* pre-decrement is faster */
o->op_ppaddr = PL_ppaddr[OP_PREDEC];
break;
--
# Ilmari Karonen -- http://www.sci.fi/~iltzu/
s''n4|9|21|3|n1\2||2|(_-<2_|4_`1|3\3_1\2_|3\3-_)2_|n\__/\_,_|___/\__|2\__,_|_|
1_|\___/\__|_|1_|\___|_|nn4_1\9|3|14|n4__/1-_)2_|1|5\3_`1|2_|1!1/2-_)2_|n3_|1\
___|_|2_|2_|1_|\__,_|\__|_i_\\\___|_|1)n45/n',y/n\n/\n/d,s/\d+/$"x$&/eg,print;
