diff options
| author | Henrik Nord <[email protected]> | 2015-11-09 16:01:10 +0100 |
|---|---|---|
| committer | Henrik Nord <[email protected]> | 2015-11-09 16:01:10 +0100 |
| commit | 60b7e6ce0925204b5e70f4d0b4b3ac596455bb93 (patch) | |
| tree | 6b80741f03a0b3f4c439367a9d1deff45ddd3fe9 | |
| parent | aed947dafb4f98bd1d770cbc63d87b3c93964f46 (diff) | |
| parent | cc1026a0e646b3a21b7bd7930fb7294425f1d79b (diff) | |
| download | otp-60b7e6ce0925204b5e70f4d0b4b3ac596455bb93.tar.gz otp-60b7e6ce0925204b5e70f4d0b4b3ac596455bb93.tar.bz2 otp-60b7e6ce0925204b5e70f4d0b4b3ac596455bb93.zip | |
Merge branch 'margnus1/cerl_trees_label_fix' into maint
* margnus1/cerl_trees_label_fix:
Fix cerl_trees:label/2 bug with map K/V swap
OTP-13091
| -rw-r--r-- | lib/compiler/src/cerl_trees.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/compiler/src/cerl_trees.erl b/lib/compiler/src/cerl_trees.erl index 2c9b72a30b..58bb18e34a 100644 --- a/lib/compiler/src/cerl_trees.erl +++ b/lib/compiler/src/cerl_trees.erl @@ -731,8 +731,8 @@ label(T, N, Env) -> {ann_c_map(As, M, Ts), N3}; map_pair -> {Op, N1} = label(map_pair_op(T), N, Env), - {Val, N2} = label(map_pair_key(T), N1, Env), - {Key, N3} = label(map_pair_val(T), N2, Env), + {Key, N2} = label(map_pair_key(T), N1, Env), + {Val, N3} = label(map_pair_val(T), N2, Env), {As, N4} = label_ann(T, N3), {ann_c_map_pair(As,Op,Key,Val), N4}; 'let' -> |