diff options
| author | Anthony Ramine <[email protected]> | 2015-03-11 14:03:58 +0100 |
|---|---|---|
| committer | Anthony Ramine <[email protected]> | 2015-03-11 14:22:40 +0100 |
| commit | d6073d78109f026ef96b29af4ce748242df2389d (patch) | |
| tree | dd5cffb4e022e2007a298f49b8109b2aa8aaf139 /erts/emulator/test | |
| parent | 735871e63c86814a0f099ab422b4d5bc8821579a (diff) | |
| download | otp-d6073d78109f026ef96b29af4ce748242df2389d.tar.gz otp-d6073d78109f026ef96b29af4ce748242df2389d.tar.bz2 otp-d6073d78109f026ef96b29af4ce748242df2389d.zip | |
Fix compilation of match specs with maps
The previous compilation was just plain wrong with push/pop mismatches.
Reported-by: Björn-Egil Dahlberg
Diffstat (limited to 'erts/emulator/test')
| -rw-r--r-- | erts/emulator/test/match_spec_SUITE.erl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/erts/emulator/test/match_spec_SUITE.erl b/erts/emulator/test/match_spec_SUITE.erl index fc4a5028e1..02ef4f8e3f 100644 --- a/erts/emulator/test/match_spec_SUITE.erl +++ b/erts/emulator/test/match_spec_SUITE.erl @@ -924,6 +924,9 @@ maps(Config) when is_list(Config) -> table), {ok,#{foo := 3},[],[]} = erlang:match_spec_test({}, [{{},[],[#{foo => {'+',1,2}}]}], table), + {ok,"camembert",[],[]} = + erlang:match_spec_test(#{b => "camembert",c => "cabécou"}, + [{#{b => '$1',c => "cabécou"},[],['$1']}], table), ok. empty_list(Config) when is_list(Config) -> |