lib/compiler/test/receive_SUITE_data/ref_opt/yes_6.erl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

-module(yes_6).
-compile(export_all).

?MODULE() ->
    ok.

f(Pid, Msg) ->
    Ref = erlang:monitor(process, Pid),
    Pid ! Msg,
    receive
	{ok,Ref,Reply} ->
	    {ok,Reply};
	{error,Ref,Reply} ->
	    {error,Reply}
    end.