summaryrefslogtreecommitdiff
path: root/erts/emulator/test/binary_SUITE.erl
diff options
context:
space:
mode:
Diffstat (limited to 'erts/emulator/test/binary_SUITE.erl')
-rw-r--r--erts/emulator/test/binary_SUITE.erl16
1 files changed, 16 insertions, 0 deletions
diff --git a/erts/emulator/test/binary_SUITE.erl b/erts/emulator/test/binary_SUITE.erl
index 06db9d3ff3..c4ebe2ab3b 100644
--- a/erts/emulator/test/binary_SUITE.erl
+++ b/erts/emulator/test/binary_SUITE.erl
@@ -1408,6 +1408,22 @@ test_terms(Test_Func) ->
Test_Func(FF = fun binary_SUITE:all/0),
Test_Func(lists:duplicate(32, FF)),
+ %% Maps.
+ SmallMap = #{a => 1, b => 2, c => 3},
+ LargeMap1 = maps:from_list([{list_to_atom(integer_to_list(36#cafe+N*N*N, 36)),N} ||
+ N <- lists:seq(1, 33)]),
+ LargeMap2 = maps:from_list([{list_to_atom(integer_to_list(36#dead+N, 36)),N} ||
+ N <- lists:seq(1, 50)]),
+ MapWithMap = LargeMap1#{SmallMap => a, LargeMap1 => LargeMap2, LargeMap2 => LargeMap1,
+ [LargeMap1,LargeMap2] => LargeMap1,
+ <<"abc">> => SmallMap, <<"qrs">> => LargeMap1,
+ <<"xyz">> => LargeMap2 },
+ Test_Func(#{}),
+ Test_Func(SmallMap),
+ Test_Func(LargeMap1),
+ Test_Func(LargeMap2),
+ Test_Func(MapWithMap),
+
ok.
test_floats(Test_Func) ->