aboutsummaryrefslogtreecommitdiffstats
path: root/lib/hipe/test/maps_SUITE_data/maps_build_and_match_over_alloc.erl
diff options
context:
space:
mode:
authorMagnus Lång <[email protected]>2014-03-26 18:58:46 +0100
committerKostis Sagonas <[email protected]>2014-04-29 11:40:29 +0200
commit5a43eb383bdeb604fd8a891ffe34610c3fe6208b (patch)
tree1a76c9a5bf0d8f32c06acb8266eaa52ce6e860d5 /lib/hipe/test/maps_SUITE_data/maps_build_and_match_over_alloc.erl
parente486d8b0c6124f39db6fa600f348c7bd5c0c1a13 (diff)
downloadotp-5a43eb383bdeb604fd8a891ffe34610c3fe6208b.tar.gz
otp-5a43eb383bdeb604fd8a891ffe34610c3fe6208b.tar.bz2
otp-5a43eb383bdeb604fd8a891ffe34610c3fe6208b.zip
Copy the tests for maps from the compiler application to a new HiPE test suite
Change the maps_guard_fun test to accept the HiPE trace format.
Diffstat (limited to 'lib/hipe/test/maps_SUITE_data/maps_build_and_match_over_alloc.erl')
-rw-r--r--lib/hipe/test/maps_SUITE_data/maps_build_and_match_over_alloc.erl16
1 files changed, 16 insertions, 0 deletions
diff --git a/lib/hipe/test/maps_SUITE_data/maps_build_and_match_over_alloc.erl b/lib/hipe/test/maps_SUITE_data/maps_build_and_match_over_alloc.erl
new file mode 100644
index 0000000000..dae6f64e5f
--- /dev/null
+++ b/lib/hipe/test/maps_SUITE_data/maps_build_and_match_over_alloc.erl
@@ -0,0 +1,16 @@
+-module(maps_build_and_match_over_alloc).
+-export([test/0]).
+
+test() ->
+ Ls = id([1,2,3]),
+ V0 = [a|Ls],
+ M0 = id(#{ "a" => V0 }),
+ #{ "a" := V1 } = M0,
+ V2 = id([c|Ls]),
+ M2 = id(#{ "a" => V2 }),
+ #{ "a" := V3 } = M2,
+ {[a,1,2,3],[c,1,2,3]} = id({V1,V3}),
+ ok.
+
+%% Use this function to avoid compile-time evaluation of an expression.
+id(I) -> I.