anchor.diff:  %% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
   
   stack_grow_test() ->    
  -    ?line Pid = setup(),
  -    ?line 1 = erlang:trace_pattern({?MODULE,loop,4},
  +    Pid = setup(),
  +    1 = erlang:trace_pattern({?MODULE,loop,4},
   				   [{'_',[],[{return_trace}]}],[meta]),
  -    ?line Num = 1 bsl 15,
  -    ?line Surface =
  +    Num = 1 bsl 15,
  +    Surface =
   	fun (This, ?RFT(P,{?MODULE,loop,4},N), N) when P == Pid->
   		if N == Num ->
   			?NM,
  
positive.code: 			This(This, receive_next(), N+1)
  		end
  	end,
      ?line Dive = 
  	fun (This, ?CTT(P,{?MODULE,loop,[{hej,hopp},[a,b,c],4.5,N]}), N)
  	    when P == Pid->
  		if N == 0 ->
  
negative.code: 	 info/1, tracer/1, combo/1, nosilent/1]).
  	 
  init_per_testcase(_Case, Config) ->
      Dog=test_server:timetrap(test_server:minutes(5)),
      [{watchdog, Dog}|Config].
  
  end_per_testcase(_Case, Config) ->
  