diff options
| author | Björn-Egil Dahlberg <[email protected]> | 2014-06-27 15:24:20 +0200 |
|---|---|---|
| committer | Björn-Egil Dahlberg <[email protected]> | 2014-08-26 12:12:48 +0200 |
| commit | 3e4422d3cf97d25423b6f5be714639e666b222d4 (patch) | |
| tree | 4208a968eafcf9cac1dfc02f90b2b4bc90ecb141 /lib/compiler/src/cerl_trees.erl | |
| parent | 4e84810eca640220a333f104d25412399b6c0d31 (diff) | |
| download | otp-3e4422d3cf97d25423b6f5be714639e666b222d4.tar.gz otp-3e4422d3cf97d25423b6f5be714639e666b222d4.tar.bz2 otp-3e4422d3cf97d25423b6f5be714639e666b222d4.zip | |
compiler: Use variables in Map cerl inliner
Diffstat (limited to 'lib/compiler/src/cerl_trees.erl')
| -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 e53bdd4efb..b93da8e97f 100644 --- a/lib/compiler/src/cerl_trees.erl +++ b/lib/compiler/src/cerl_trees.erl @@ -520,9 +520,9 @@ variables(T, S) -> tuple -> vars_in_list(tuple_es(T), S); map -> - vars_in_list(map_es(T), S); + vars_in_list([map_arg(T)|map_es(T)], S); map_pair -> - vars_in_list([map_pair_op(T),map_pair_key(T), map_pair_val(T)], S); + vars_in_list([map_pair_op(T),map_pair_key(T),map_pair_val(T)], S); 'let' -> Vs = variables(let_body(T), S), Vs1 = var_list_names(let_vars(T)), |