anchor.diff:      case length(CompileMods) of
   	0 ->
   	    io:fwrite("WARNING: No modules to cover compile!\n\n",[]),
  -	    cover:start(),			% start cover server anyway
  +	    {ok, _} = start_cover(),			% start cover server anyway
   	    {ok,CoverInfo#cover{mods=[]}};
   	N ->
   	    io:fwrite("Cover compiling '~w' (~w files) - "
  
positive.code: 
  
  do_cover_compile(Modules) ->
      cover:start(),
      Sticky = prepare_cover_compile(Modules,[]),
      R = cover:compile_beam(Modules),
      [warn_compile(Error) || Error <- R,element(1,Error)=/=ok],
      [code:stick_mod(M) || M <- Sticky],
      ok.
  
  warn_compile({error,{Reason,Module}}) ->
  
negative.code: 		{UserTTSup,_StartTime} ->
  		    remove_user_timetrap(UserTTSup),
  		    put(test_server_user_timetrap,
  			proplists:delete(TCPid, UserTTs)),
  			ok;
  		undefined ->
  		    ok
  	    end
      end,
      if SendToServer == true ->
  	    group_leader() ! {timetrap_cancel_all,TCPid,self()},
  	    ok;
         true ->
  	    ok
      end,
  