aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2012-11-24 08:47:41 +0100
committerBjörn Gustavsson <[email protected]>2012-11-26 12:02:06 +0100
commit871a67b5f2696cca6124e85a9b3ad9355a041ba6 (patch)
tree73a3c9379a81363aaad245c86e0f80a0008937dd
parent1204bb9dc739a80557fb1fa6e35cc113bf943823 (diff)
downloadotp-871a67b5f2696cca6124e85a9b3ad9355a041ba6.tar.gz
otp-871a67b5f2696cca6124e85a9b3ad9355a041ba6.tar.bz2
otp-871a67b5f2696cca6124e85a9b3ad9355a041ba6.zip
beam_jump: Move bs_context_to_binary/1 + exit instruction
Generate slightly smaller and faster code.
-rw-r--r--lib/compiler/src/beam_jump.erl2
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/compiler/src/beam_jump.erl b/lib/compiler/src/beam_jump.erl
index b05d01b2a1..636c299e47 100644
--- a/lib/compiler/src/beam_jump.erl
+++ b/lib/compiler/src/beam_jump.erl
@@ -220,6 +220,8 @@ extract_seq([{line,_}=Line|Is], Acc) ->
extract_seq(Is, [Line|Acc]);
extract_seq([{block,_}=Bl|Is], Acc) ->
extract_seq_1(Is, [Bl|Acc]);
+extract_seq([{bs_context_to_binary,_}=I|Is], Acc) ->
+ extract_seq_1(Is, [I|Acc]);
extract_seq([{label,_}|_]=Is, Acc) ->
extract_seq_1(Is, Acc);
extract_seq(_, _) -> no.