aboutsummaryrefslogtreecommitdiffstats
path: root/erts/emulator/utils/beam_makeops
diff options
context:
space:
mode:
Diffstat (limited to 'erts/emulator/utils/beam_makeops')
-rwxr-xr-xerts/emulator/utils/beam_makeops3
1 files changed, 2 insertions, 1 deletions
diff --git a/erts/emulator/utils/beam_makeops b/erts/emulator/utils/beam_makeops
index 75047f22bd..b5187dd676 100755
--- a/erts/emulator/utils/beam_makeops
+++ b/erts/emulator/utils/beam_makeops
@@ -1446,8 +1446,9 @@ sub tr_gen_from {
push(@code, &make_op('', 'next_arg'));
}
}
+ # Remove redundant 'next_arg' instructions before 'next_instr'.
+ pop(@code) while is_instr($code[$#code], 'next_arg');
push(@code, &make_op('', 'next_instr'));
- pop(@code) if $code[$#code]->[1][0] eq 'next_arg';
}
#