aboutsummaryrefslogtreecommitdiffstats
path: root/lib/stdlib/test/erl_eval_SUITE.erl
diff options
context:
space:
mode:
authorAnthony Ramine <[email protected]>2014-05-03 20:49:08 +0200
committerAnthony Ramine <[email protected]>2014-05-03 21:06:37 +0200
commitec15a2aaab58816c728676807c0b6e61d5a5185e (patch)
treeb7e26e2843ac2060696ea12635d393f91ac5dab6 /lib/stdlib/test/erl_eval_SUITE.erl
parentaca0b6182b039333b4c963938878d9eecc85e5a1 (diff)
downloadotp-ec15a2aaab58816c728676807c0b6e61d5a5185e.tar.gz
otp-ec15a2aaab58816c728676807c0b6e61d5a5185e.tar.bz2
otp-ec15a2aaab58816c728676807c0b6e61d5a5185e.zip
Fix evaluation of map updates in the debugger and erl_eval
Reported-by: José Valim
Diffstat (limited to 'lib/stdlib/test/erl_eval_SUITE.erl')
-rw-r--r--lib/stdlib/test/erl_eval_SUITE.erl7
1 files changed, 7 insertions, 0 deletions
diff --git a/lib/stdlib/test/erl_eval_SUITE.erl b/lib/stdlib/test/erl_eval_SUITE.erl
index b91d14b5b8..b55324161b 100644
--- a/lib/stdlib/test/erl_eval_SUITE.erl
+++ b/lib/stdlib/test/erl_eval_SUITE.erl
@@ -1451,6 +1451,13 @@ eep43(Config) when is_list(Config) ->
" {Map#{a := B},Map#{a => c},Map#{d => e}} "
"end.",
{#{a => b},#{a => c},#{a => b,d => e}}),
+ check(fun () ->
+ lists:map(fun (X) -> X#{price := 0} end,
+ [#{hello => 0, price => nil}])
+ end,
+ "lists:map(fun (X) -> X#{price := 0} end,
+ [#{hello => 0, price => nil}]).",
+ [#{hello => 0, price => 0}]),
error_check("[camembert]#{}.", {badarg,[camembert]}),
error_check("#{} = 1.", {badmatch,1}),
ok.