Browse Source

also delete reverse mapping (delete_globals())

Ulf Wiger 9 years ago
parent
commit
6ae40f382d
1 changed files with 2 additions and 1 deletions
  1. 2 1
      src/gproc_dist.erl

+ 2 - 1
src/gproc_dist.erl

@@ -836,7 +836,8 @@ delete_globals(Globals) ->
     lists:foreach(
       fun({{_,g,_},T} = K) when is_atom(T); is_pid(T) ->
               ets:delete(?TAB, K);
-	 ({{{_,g,_},T} = K, _}) when is_atom(T); is_pid(T) ->
+	 ({{{_,g,_},T} = K, P}) when is_pid(P),is_atom(T); is_pid(P),is_pid(T) ->
+	      ets:delete(?TAB, {P, K}),
 	      ets:delete(?TAB, K);
          ({Pid, Key}) when is_pid(Pid); Pid==shared ->
 	      ets:delete(?TAB, {Pid, Key})