anchor.diff:      Loads = [receive {Pid, change, Res} -> Res end || Pid <- Pids],
       [receive {Pid, completed, Token2} -> ok end || Pid <- Pids],
   
  -    ok = ensure_only_one_load(Loads, 0).
  +    ok = ensure_only_one_load(Loads, 0),
  +    {save_config, [{purge_pids,Pids}]}.
   
   ensure_only_one_load([], 1) -> ok;
   ensure_only_one_load([], _) -> too_many_loads;
  
positive.code: %% Copyright (C) 2012 Björn-Egil Dahlberg
  %%
  %% File:    code_parallel_load_SUITE.erl
  %% Author:  Björn-Egil Dahlberg
  %% Created: 2012-01-19
  -module(code_parallel_load_SUITE).
  -export([
  	all/0,
  
negative.code:     [{watchdog, Dog}|Config].
  
  end_per_testcase(_Func, Config) ->
      SConf = ?config(save_config, Config),
      Pids  = proplists:get_value(purge_pids, SConf),
  
      case check_old_code(?model) of
  	true -> check_and_purge_processes_code(Pids, ?model);
  	_ ->    ok
      end,
      case erlang:delete_module(?model) of
  	true -> check_and_purge_processes_code(Pids, ?model);
  	_ ->    ok
      end,
      Dog=?config(watchdog, Config),
      ?t:timetrap_cancel(Dog).
  
  
  multiple_load_check_purge_repeat(_Conf) ->
      Ts    = [v1,v2,v3,v4,v5,v6],
  