diff options
| author | Ilya Zakharevich <ilya@math.berkeley.edu> | 1998-02-15 12:49:46 -0500 |
|---|---|---|
| committer | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1998-02-20 12:37:11 +0000 |
| commit | fd4d14078b82560da929cbc223603d6d67efc540 (patch) | |
| tree | a897a47db9e1ef3317c02bdb8d2bb59f642d9d70 /op.c | |
| parent | 77172323415a4b61c8f98abfe2f753fd42bceeee (diff) | |
| download | perl-fd4d14078b82560da929cbc223603d6d67efc540.tar.gz | |
5% speedup in an empty loop
p4raw-id: //depot/perl@545
Diffstat (limited to 'op.c')
| -rw-r--r-- | op.c | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -4825,6 +4825,8 @@ peep(register OP *o) case OP_AND: case OP_OR: o->op_seq = op_seqmax++; + while (cLOGOP->op_other->op_type == OP_NULL) + cLOGOP->op_other = cLOGOP->op_other->op_next; peep(cLOGOP->op_other); break; |