anchor.diff:  
   %% Test functions
   -export([all/0, suite/0,groups/0,init_per_suite/1, end_per_suite/1, 
  -	 init_per_group/2,end_per_group/2,text/1,text_tracing_off/1]).
  +	 init_per_group/2,end_per_group/2]).
  +-export([text/1,text/2,text_tracing_off/1,text_tracing_off/2]).
   -export([init_per_testcase/2, end_per_testcase/2]).
   
   -include_lib("test_server/include/test_server.hrl").
  
positive.code:     ?line timer:sleep(3000),
      ?line etop:config(sort,msg_q),
      ?line timer:sleep(3000),
      ?line etop:stop(),
      ?line ?t:stop_node(Node),
      ok.
  
  text_tracing_off(suite) ->
      [];
  
negative.code: init_per_testcase(_Case, Config) ->
      ?line Dog=test_server:timetrap(?default_timeout),
      [{watchdog, Dog}|Config].
  end_per_testcase(Case, Config) ->
      try apply(?MODULE,Case,[cleanup,Config])
      catch error:undef -> ok
      end,
      Dog=?config(watchdog, Config),
      ?t:timetrap_cancel(Dog),
      ok.
  