anchor.diff:      print_timestamp(minor, "Ended at "),
       print(major, "=ended         ~s", [lists:flatten(timestamp_get(""))]),
   
  -    do_if_parallel(Main, ok, fun() -> file:set_cwd(filename:dirname(TSDir)) end),
  +    do_unless_parallel(Main, fun() -> file:set_cwd(filename:dirname(TSDir)) end),
   
       %% call the appropriate progress function clause to print the results to log
       Status =
  
positive.code: 	  [num2str(Num),fw_name(Mod),GroupName,MinorBase,Func,
  	   MinorBase,MinorBase]),
  
      do_if_parallel(Main, ok, fun erlang:yield/0),
  
      RejectIoReqs = get(test_server_reject_io_reqs),
      %% run the test case
  
negative.code: %%--------------------------------------------------------------------
  %% various help functions
  
  %% Call Action if we are running on the main process (not parallel).
  do_unless_parallel(Main, Action) when is_function(Action, 0) ->
      case self() of
  	Main -> Action();
  	_ -> ok
      end.
  
  num2str(0) -> "";
  