anchor.diff:      %% temp fix (?) to ensure that everything gets printed before halt/1 terminates erts
       timer:sleep(1000), % 1s
   
  +%    case erlang:erase(test_started_mnesia) of
  +%	true ->
  +%	    io:format("~nStopping Mnesia since I started it..."),
  +%	    stopped = mnesia:stop(),
  +%	    io:format("ok~n");
  +%	_ ->
  +%	    ok
  +%    end,
  +    
       if
   	Status == error, Mode == shell -> erlang:halt(1);
   	Status == ok, Mode == shell -> erlang:halt(0);
  
positive.code: 				io:format(".")
  			end,
  			Num + 1
  		end, 0, ?TEST_MODULES),
      io:format("~p~n", [length(?TEST_MODULES)]),
  
      %% Run the tests
      Status = run([erl]),
  
      %% Calculate coverage
      {ok, CoveredLines, TotalLines, ModuleStats} = aggregate_coverage(?TEST_MODULES),
  
      io:format("~n"),
      io:format("======================================================================~n"),
  
negative.code: %%====================================================================
  
  %%--------------------------------------------------------------------
  %% Function: fake_logger_loop(Enabled)
  %%           Enabled = bool(), output to console or not?
  %% Descrip.: Main loop for a process that does nothing more than
  %%           registers itself as 'logger'. This is needed when this
  %%           module is executed from a unix-shell, instead of from an
  %%           erlang prompt with an Yxa application running.
  %% Returns : does not return.
  %%--------------------------------------------------------------------
  fake_logger_loop(Enabled) ->
      receive
  	exit ->
  	    ok;
  	{'$gen_cast', {log, _Level, Data}} when Enabled == true ->
  	    io:format("~s~n", [binary_to_list(Data)]),
  	    fake_logger_loop(Enabled);
  	enable ->
  	    fake_logger_loop(true);
  	disable ->
  	    fake_logger_loop(false);
  	_ ->
  	    fake_logger_loop(Enabled)
      end.
  
  %%--------------------------------------------------------------------
  