diff options
| author | Björn-Egil Dahlberg <[email protected]> | 2014-04-02 17:00:43 +0200 |
|---|---|---|
| committer | Björn-Egil Dahlberg <[email protected]> | 2014-04-03 14:32:44 +0200 |
| commit | cc7a3c5896bc266bb97287dd4e31b696d8cf604f (patch) | |
| tree | d19e07f7b30e2723184e1789f9113f6060428a15 /lib/compiler/src/sys_pre_expand.erl | |
| parent | eba291a52d4a78c128c5802775fa1bff187e0604 (diff) | |
| download | otp-cc7a3c5896bc266bb97287dd4e31b696d8cf604f.tar.gz otp-cc7a3c5896bc266bb97287dd4e31b696d8cf604f.tar.bz2 otp-cc7a3c5896bc266bb97287dd4e31b696d8cf604f.zip | |
compiler,stdlib: Fix Map literals as keys for Maps in patterns
Diffstat (limited to 'lib/compiler/src/sys_pre_expand.erl')
| -rw-r--r-- | lib/compiler/src/sys_pre_expand.erl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/compiler/src/sys_pre_expand.erl b/lib/compiler/src/sys_pre_expand.erl index 91a46a20fe..761ae8409c 100644 --- a/lib/compiler/src/sys_pre_expand.erl +++ b/lib/compiler/src/sys_pre_expand.erl @@ -232,7 +232,7 @@ pattern({map,Line,Ps}, St0) -> {TPs,St1} = pattern_list(Ps, St0), {{map,Line,TPs},St1}; pattern({map_field_exact,Line,K0,V0}, St0) -> - {K,St1} = pattern(K0, St0), + {K,St1} = expr(K0, St0), {V,St2} = pattern(V0, St1), {{map_field_exact,Line,K,V},St2}; %%pattern({struct,Line,Tag,Ps}, St0) -> |