Exercício 3

• Enunciado
• Solução

Enunciado

Desenvolva um módulo Erlang que implemente o processo descrito no diagrama seguinte:

Solução

-module(exercicio3).
-export([start/0,p1/1,p2/1]).

start() ->
	P1=spawn(exercicio3,p1,[self()]),
	P2=spawn(exercicio3,p2,[self()]),

	P1!msg1,
	receive
		msg2 -> ok;
	end,
	P2!msg3,
	receive
		msg4 ->
	end,
	io:format("Fim.~n",[]).

p1(PidStart) ->
	receive
		msg1 -> ok
	end,
	PidStart!msg2.

p2(PidStart) ->
	receive
		msg3 -> ok
	end,
	PidStart!msg4.

Última actualização: 22-03-2000