summaryrefslogtreecommitdiff
path: root/peep.c
diff options
context:
space:
mode:
Diffstat (limited to 'peep.c')
-rw-r--r--peep.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/peep.c b/peep.c
index 32fa401d46..ec89797205 100644
--- a/peep.c
+++ b/peep.c
@@ -3799,7 +3799,7 @@ Perl_rpeep(pTHX_ OP *o)
}
break;
- case OP_SASSIGN:
+ case OP_SASSIGN: {
if (OP_GIMME(o,0) == G_VOID
|| ( o->op_next->op_type == OP_LINESEQ
&& ( o->op_next->op_next->op_type == OP_LEAVESUB
@@ -3893,6 +3893,7 @@ Perl_rpeep(pTHX_ OP *o)
oldoldop = NULL; oldop = NULL;
}
break;
+ }
case OP_AASSIGN: {
int l, r, lr, lscalars, rscalars;