aboutsummaryrefslogtreecommitdiffstats
path: root/erts/emulator/test
diff options
context:
space:
mode:
authorBjörn-Egil Dahlberg <[email protected]>2015-03-27 18:40:59 +0100
committerBjörn-Egil Dahlberg <[email protected]>2015-03-27 18:40:59 +0100
commit43b489d3901543251a6a1a49cb899b5b199864ba (patch)
tree5e9f7ed2df88b26559266bc18eb6a7252abc2a5c /erts/emulator/test
parent740f19448e936d9f03ceb50d27ec1a76749dda6a (diff)
downloadotp-43b489d3901543251a6a1a49cb899b5b199864ba.tar.gz
otp-43b489d3901543251a6a1a49cb899b5b199864ba.tar.bz2
otp-43b489d3901543251a6a1a49cb899b5b199864ba.zip
erts: Add tests for internal_hash
Diffstat (limited to 'erts/emulator/test')
-rw-r--r--erts/emulator/test/map_SUITE.erl14
1 files changed, 14 insertions, 0 deletions
diff --git a/erts/emulator/test/map_SUITE.erl b/erts/emulator/test/map_SUITE.erl
index 228832ac0a..e28f8f2d0e 100644
--- a/erts/emulator/test/map_SUITE.erl
+++ b/erts/emulator/test/map_SUITE.erl
@@ -64,6 +64,7 @@
%% misc
t_hashmap_balance/1,
t_erts_internal_order/1,
+ t_erts_internal_hash/1,
t_pdict/1,
t_ets/1,
t_dets/1,
@@ -115,6 +116,7 @@ all() -> [
%% Other functions
t_hashmap_balance,
t_erts_internal_order,
+ t_erts_internal_hash,
t_pdict,
t_ets,
t_tracing
@@ -1549,6 +1551,18 @@ t_erts_internal_order(_Config) when is_list(_Config) ->
1 = maps:get(0,M1),
ok.
+t_erts_internal_hash(_Config) when is_list(_Config) ->
+ K1 = 0.0,
+ K2 = 0.0/-1,
+
+ M1 = (maps:from_list([{I,I}||I<-lists:seq(1,32)]))#{ K1 => a, K2 => b },
+ b = maps:get(K2,M1),
+
+ M2 = (maps:from_list([{I,I}||I<-lists:seq(1,32)]))#{ K2 => a, K1 => b },
+ b = maps:get(K1,M2),
+
+ ok.
+
t_pdict(_Config) ->
put(#{ a => b, b => a},#{ c => d}),