Browse Source

gproc_dist would crash in surrender()

Ulf Wiger 11 years ago
parent
commit
7cdba2293a
2 changed files with 3 additions and 3 deletions
  1. 1 1
      src/gproc_dist.erl
  2. 2 2
      test/gproc_dist_tests.erl

+ 1 - 1
src/gproc_dist.erl

@@ -734,7 +734,7 @@ surrendered_1(Globs) ->
 		  _ = gproc_lib:ensure_monitor(Pid, g),
 		  ets:insert_new(?TAB, {{Pid,Key}, []}),
                   Acc;
-	     ({{Pid,_}=K, Opts}, Acc) when node(Pid) =/= node() ->
+	     ({{Pid,_}=K, Opts}, Acc) -> % when node(Pid) =/= node() ->
 		     ets:insert(?TAB, {K, Opts}),
 		     Acc;
              ({_, Pid, _} = Obj, Acc) when node(Pid) == node() ->

+ 2 - 2
test/gproc_dist_tests.erl

@@ -33,8 +33,8 @@ dist_test_() ->
 			    rpc:multicall(Ns, application, start, [gproc])),
 	       Ns
        end,
-       fun(Ns) ->
-	       [rpc:call(N, init, stop, []) || N <- Ns]
+       fun(_Ns) ->
+	       ok
        end,
        fun(Ns) ->
 	       {inorder,