Просмотр исходного кода

improve badmatch output in t_follow_monitor

Ulf Wiger 8 лет назад
Родитель
Сommit
7bf3f4844f
1 измененных файлов с 4 добавлено и 2 удалено
  1. 4 2
      test/gproc_dist_tests.erl

+ 4 - 2
test/gproc_dist_tests.erl

@@ -477,9 +477,11 @@ t_follow_monitor([A,B|_]) ->
     Na = ?T_NAME,
     Pa = t_spawn(A, _Selective = true),
     Ref = t_call(Pa, {apply, gproc, monitor, [Na, follow]}),
-    {gproc,unreg,Ref,Na} = got_msg(Pa),
+    Msg1 = {gproc,unreg,Ref,Na},
+    {Msg1, Msg1} = {got_msg(Pa), Msg1},
     Pb = t_spawn_reg(B, Na),
-    {gproc,registered,Ref,Na} = got_msg(Pa),
+    Msg2 = {gproc,registered,Ref,Na},
+    {Msg2, Msg2} = {got_msg(Pa), Msg2},
     ok = t_call(Pb, die),
     ok = t_call(Pa, die).