anchor.diff:      end,
       R.
   
  -pmap2(Fun,List) ->
  -    Collector = self(),
  -    Pids = lists:map(fun(E) ->
  -			     spawn(fun() ->
  -					   Collector ! {res,self(),Fun(E)}
  -				   end)
  -		     end, List),
  -    lists:map(fun(Pid) ->
  -		      receive
  -			  {res,Pid,Res} ->
  -			      Res
  -		      end
  -	      end, Pids).
  +merge_analysis_results([{M,{Cov,NotCov}}|T],ATF,Acc) ->
  +    case lists:keytake(M,1,ATF) of
  +	{value,{_,R},ATF1} ->
  +	    merge_analysis_results(T,ATF1,[{M,{Cov,NotCov,R}}|Acc]);
  +	false ->
  +	    merge_analysis_results(T,ATF,Acc)
  +    end;
  +merge_analysis_results([],_,Acc) ->
  +    Acc.
   
   do_cover_for_node(Node,CoverFunc) ->
       do_cover_for_node(Node,CoverFunc,true).
  
positive.code: %% after the test is completed.
  cover_analyse(Dir,#cover{level=Analyse,mods=Modules,stop=Stop}) ->
      io:fwrite(user, "Cover analysing... ", []),
      DetailsFun =
  	case Analyse of
  	    details ->
  		case cover:export(filename:join(Dir,"all.coverdata")) of
  		    ok ->
  			fun(M) ->
  				OutFile = filename:join(Dir,
  							atom_to_list(M) ++
  							".COVER.html"),
  				case cover:analyse_to_file(M,OutFile,[html]) of
  				    {ok,_} ->
  					{file,OutFile};
  				    Error ->
  					Error
  				end
  			end;
  		    Error ->
  			fun(_) -> Error end
  		end;
  	    overview ->
  		case cover:export(filename:join(Dir,"all.coverdata")) of
  		    ok ->
  			fun(_) -> undefined end;
  		    Error ->
  			fun(_) -> Error end
  		end
  	end,
      R = pmap2(
  	  fun(M) ->
  		  case cover:analyse(M,module) of
  		      {ok,{M,{Cov,NotCov}}} ->
  			  {M,{Cov,NotCov,DetailsFun(M)}};
  		      Err ->
  			  io:fwrite(user,
  				    "\nWARNING: Analysis failed for ~w. Reason: ~p\n",
  				    [M,Err]),
  			  {M,Err}
  		  end
  	  end, Modules),
      io:fwrite(user, "done\n\n", []),
  
      case Stop of
  
negative.code: %%
  %% %CopyrightBegin%
  %%
  %% Copyright Ericsson AB 1996-2015. All Rights Reserved.
  %%
  %% The contents of this file are subject to the Erlang Public License,
  %% Version 1.1, (the "License"); you may not use this file except in
  