projects
/
perl.git
/ commitdiff
free
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
(parent:
106d245
)
pmruntime(): change '=' to '==' in an assertion
author
David Mitchell <davem@iabyn.com>
Wed, 30 Jan 2013 16:40:55 +0000 (16:40 +0000)
committer
David Mitchell <davem@iabyn.com>
Wed, 30 Jan 2013 16:40:55 +0000 (16:40 +0000)
Whoops!
Probably harmless, since if the thing it was intended to assert for
was indeed true, then the assignment would be a noop anyway.
op.c
patch
|
blob
|
blame
|
history
diff --git
a/op.c
b/op.c
index
edc2362
..
c9a1b53
100644
(file)
--- a/
op.c
+++ b/
op.c
@@
-4563,7
+4563,7
@@
Perl_pmruntime(pTHX_ OP *o, OP *expr, bool isreg, I32 floor)
o->op_next = leaveop->op_first->op_sibling;
/* skip leave */
assert(leaveop->op_flags & OPf_KIDS);
- assert(leaveop->op_last->op_next = (OP*)leaveop);
+ assert(leaveop->op_last->op_next == (OP*)leaveop);
leaveop->op_next = NULL; /* stop on last op */
op_null((OP*)leaveop);
}