aboutsummaryrefslogtreecommitdiffstats
path: root/lib/compiler/test/receive_SUITE_data/ref_opt/yes_14.erl
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2018-08-24 10:10:15 +0200
committerBjörn Gustavsson <[email protected]>2018-08-24 10:10:15 +0200
commit9facb02b91979ef90b47ac0a54d1eb71fdaa1ee1 (patch)
tree157b93e73c57080c88a8be1be821783403d0be3e /lib/compiler/test/receive_SUITE_data/ref_opt/yes_14.erl
parent35979da59dd3c88601ed73a5eeb9054bbd28b5a1 (diff)
parentb3af7a279312a6203865d13b5885960cd187bda2 (diff)
downloadotp-9facb02b91979ef90b47ac0a54d1eb71fdaa1ee1.tar.gz
otp-9facb02b91979ef90b47ac0a54d1eb71fdaa1ee1.tar.bz2
otp-9facb02b91979ef90b47ac0a54d1eb71fdaa1ee1.zip
Merge branch 'bjorn/compiler/ssa'
* bjorn/compiler/ssa: Travis CI: Run the SSA linter in the Linux64SmokeTest build Remove retired compiler passes Introduce a new SSA-based intermediate format hipe_beam_to_icode: Correct translation of get_map_elements beam_dead: Remove shortcut of binary matching instruction beam_bs: Remove optimizations that are easier done on SSA format Don't run unsafe compiler passes Simplify optimizations by introducing is_nil late beam_utils: Make is_tagged_tuple a pure test beam_except: Enhance recognition of function_clause exceptions beam_validator: Infer the types of copies in a smarter way beam_validator: Improve merge of cons and literal list beam_validator: Strengthen validation of func_info beam_validator: Allow get_tuple_element before dsetelement beam_validator: Don't transfer state to labels that can't be reached beam_validator: Improve type analysis for tuples beam_validator: Be more careful when updating try/catch state beam_trim: Handle an empty list of instructions v3_core: Number argument variables in ascending order Teach binary instructions to use Y registers as destination OTP-14894
Diffstat (limited to 'lib/compiler/test/receive_SUITE_data/ref_opt/yes_14.erl')
-rw-r--r--lib/compiler/test/receive_SUITE_data/ref_opt/yes_14.erl27
1 files changed, 27 insertions, 0 deletions
diff --git a/lib/compiler/test/receive_SUITE_data/ref_opt/yes_14.erl b/lib/compiler/test/receive_SUITE_data/ref_opt/yes_14.erl
new file mode 100644
index 0000000000..aa47c02af9
--- /dev/null
+++ b/lib/compiler/test/receive_SUITE_data/ref_opt/yes_14.erl
@@ -0,0 +1,27 @@
+-module(yes_14).
+-compile(export_all).
+
+?MODULE() ->
+ ok.
+
+do_call(Process, Request) ->
+ Mref = erlang:monitor(process, Process),
+ Process ! Request,
+ Local = case node(Process) of
+ Node when Node =:= node() -> true;
+ _Node -> false
+ end,
+ id(Local),
+ receive
+ {X,Y,Z} when Mref =/= X, Z =:= 42, Mref =:= Y ->
+ error;
+ {X,Y,_} when Mref =/= X, Mref =:= Y ->
+ error;
+ {Mref, Reply} ->
+ erlang:demonitor(Mref, [flush]),
+ {ok, Reply};
+ {'DOWN', Mref, _, _, _} ->
+ error
+ end.
+
+id(I) -> I.