diff options
| author | Björn Gustavsson <[email protected]> | 2012-11-24 08:47:41 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2012-11-26 12:02:06 +0100 |
| commit | 871a67b5f2696cca6124e85a9b3ad9355a041ba6 (patch) | |
| tree | 73a3c9379a81363aaad245c86e0f80a0008937dd | |
| parent | 1204bb9dc739a80557fb1fa6e35cc113bf943823 (diff) | |
| download | otp-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.erl | 2 |
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. |