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: %%
  %% %CopyrightBegin%
  %%
  %% Copyright Ericsson AB 1996-2014. 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
  
negative.code: %% after the test is completed.
  cover_analyse(Dir,#cover{level=Analyse,mods=Modules,stop=Stop}) ->
      io:fwrite(user, "Cover analysing... ", []),
      {ATFOk,ATFFail} =
  	case Analyse of
  	    details ->
  		case cover:export(filename:join(Dir,"all.coverdata")) of
  		    ok ->
  			{result,Ok1,Fail1} =
  			    cover:analyse_to_file(Modules,[{outdir,Dir},html]),
  			{lists:map(fun(OutFile) ->
  					   M = list_to_atom(
  						 filename:basename(
  						   filename:rootname(OutFile,
  								     ".COVER.html")
  						  )
  						),
  					   {M,{file,OutFile}}
  				   end, Ok1),
  			lists:map(fun({Reason,M}) ->
  					  {M,{error,Reason}}
  				  end, Fail1)};
  		    Error ->
  			{[],lists:map(fun(M) -> {M,Error} end, Modules)}
  		end;
  	    overview ->
  		case cover:export(filename:join(Dir,"all.coverdata")) of
  		    ok ->
  			{[],lists:map(fun(M) -> {M,undefined} end, Modules)};
  		    Error ->
  			{[],lists:map(fun(M) -> {M,Error} end, Modules)}
  		end
  	end,
      {result,AOk,AFail} = cover:analyse(Modules,module),
      R = merge_analysis_results(AOk,ATFOk++ATFFail,[]) ++
  	[{M,{error,Reason}} || {Reason,M} <- AFail],
  
      io:fwrite(user, "done\n\n", []),
  
      case Stop of
  