various cleanups

p4raw-id: //depot/perl@4350

1 files changed, 3 insertions, 1 deletions

diff --git a/op.c b/op.c
index b0a5bc4fb3..c59940dd4e 100644
--- a/op.c
+++ b/op.c
@@ -6158,8 +6158,10 @@ Perl_peep(pTHX_ register OP *o)
 	case OP_RV2AV:
 	case OP_RV2HV:
 	    if (!(o->op_flags & OPf_WANT)
-		|| o->op_flags & OPf_WANT == OPf_WANT_LIST)
+		|| (o->op_flags & OPf_WANT) == OPf_WANT_LIST)
+	    {
 		last_composite = o;
+	    }
 	    o->op_seq = PL_op_seqmax++;
 	    break;