diff options
| author | Björn Gustavsson <[email protected]> | 2015-02-27 15:17:01 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2015-03-09 09:41:12 +0100 |
| commit | 1f0ae04d3745bf316f620ef35b24f87c0da7c05b (patch) | |
| tree | 9774006cb02d81c0129a59785d05ceac15ed5d05 /lib/compiler/src/beam_a.erl | |
| parent | ea46a223e34eefbc765facb0ec0fd90fb891c53d (diff) | |
| download | otp-1f0ae04d3745bf316f620ef35b24f87c0da7c05b.tar.gz otp-1f0ae04d3745bf316f620ef35b24f87c0da7c05b.tar.bz2 otp-1f0ae04d3745bf316f620ef35b24f87c0da7c05b.zip | |
Introduce '%live' annotations with a complete register map
As a preparation for fixing a bug, introduce a complete register
map in the '%live' annotations.
Diffstat (limited to 'lib/compiler/src/beam_a.erl')
| -rw-r--r-- | lib/compiler/src/beam_a.erl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/compiler/src/beam_a.erl b/lib/compiler/src/beam_a.erl index fe4f473846..dd7e03dd28 100644 --- a/lib/compiler/src/beam_a.erl +++ b/lib/compiler/src/beam_a.erl @@ -54,6 +54,9 @@ rename_instrs([{call_only,A,F}|Is]) -> [{call,A,F},return|rename_instrs(Is)]; rename_instrs([{call_ext_only,A,F}|Is]) -> [{call_ext,A,F},return|rename_instrs(Is)]; +rename_instrs([{'%live',_}|Is]) -> + %% When compiling from old .S files. + rename_instrs(Is); rename_instrs([I|Is]) -> [rename_instr(I)|rename_instrs(Is)]; rename_instrs([]) -> []. |