diff options
| author | Hugo van der Sanden <hv@crypt.org> | 2005-10-14 19:22:41 +0100 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2005-10-15 21:35:29 +0000 |
| commit | 679d6c4eed9fff03ad56a76e8f8ed516c6e0deb2 (patch) | |
| tree | c7f19105bf6b38edbcb7eade5c972bd5176d4f41 /op.c | |
| parent | 016930a652f8808ad727da23a377e1d4e4f4ef41 (diff) | |
| download | perl-679d6c4eed9fff03ad56a76e8f8ed516c6e0deb2.tar.gz | |
pre{inc,dec} is faster, even with integers
Message-Id: <200510141722.j9EHMfa25945@zen.crypt.org>
Date: Fri, 14 Oct 2005 18:22:41 +0100
p4raw-id: //depot/perl@25763
Diffstat (limited to 'op.c')
| -rw-r--r-- | op.c | 10 |
1 files changed, 10 insertions, 0 deletions
@@ -804,6 +804,16 @@ Perl_scalarvoid(pTHX_ OP *o) o->op_ppaddr = PL_ppaddr[OP_PREDEC]; break; + case OP_I_POSTINC: + o->op_type = OP_I_PREINC; /* pre-increment is faster */ + o->op_ppaddr = PL_ppaddr[OP_I_PREINC]; + break; + + case OP_I_POSTDEC: + o->op_type = OP_I_PREDEC; /* pre-decrement is faster */ + o->op_ppaddr = PL_ppaddr[OP_I_PREDEC]; + break; + case OP_OR: case OP_AND: case OP_DOR: |