diff options
| author | Anthony Ramine <[email protected]> | 2014-05-04 11:01:06 +0200 |
|---|---|---|
| committer | Anthony Ramine <[email protected]> | 2014-05-04 11:04:17 +0200 |
| commit | 41fa9cf089edf3d8c0d7950d38285ebd68ec8070 (patch) | |
| tree | f542565ebdd176e7bc473fc7c9f35b09bb1ec1d7 /lib/compiler | |
| parent | aca0b6182b039333b4c963938878d9eecc85e5a1 (diff) | |
| download | otp-41fa9cf089edf3d8c0d7950d38285ebd68ec8070.tar.gz otp-41fa9cf089edf3d8c0d7950d38285ebd68ec8070.tar.bz2 otp-41fa9cf089edf3d8c0d7950d38285ebd68ec8070.zip | |
Support maps in cerl:ann_make_tree/3
Diffstat (limited to 'lib/compiler')
| -rw-r--r-- | lib/compiler/src/cerl.erl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/compiler/src/cerl.erl b/lib/compiler/src/cerl.erl index 54eac20ac4..b7e1f0b70b 100644 --- a/lib/compiler/src/cerl.erl +++ b/lib/compiler/src/cerl.erl @@ -4245,6 +4245,9 @@ ann_make_tree(As, bitstr, [[V],[S],[U],[T],[Fs]]) -> ann_c_bitstr(As, V, S, U, T, Fs); ann_make_tree(As, cons, [[H], [T]]) -> ann_c_cons(As, H, T); ann_make_tree(As, tuple, [Es]) -> ann_c_tuple(As, Es); +ann_make_tree(As, map, [Es]) -> ann_c_map(As, Es); +ann_make_tree(As, map, [[A], Es]) -> ann_c_map(As, A, Es); +ann_make_tree(As, map_pair, [[Op], [K], [V]]) -> ann_c_map_pair(As, Op, K, V); ann_make_tree(As, 'let', [Vs, [A], [B]]) -> ann_c_let(As, Vs, A, B); ann_make_tree(As, seq, [[A], [B]]) -> ann_c_seq(As, A, B); ann_make_tree(As, apply, [[Op], Es]) -> ann_c_apply(As, Op, Es); |