anchor.diff:      ?t:timetrap_cancel(Dog).
   
   call_with_huge_message_queue(Config) when is_list(Config) ->
  -    ?line Pid = spawn_link(fun echo_loop/0),
  +    Pid = spawn_link(fun echo_loop/0),
   
  -    ?line {Time,ok} = tc(fun() -> calls(10, Pid) end),
  +    {Time,ok} = tc(fun() -> calls(10, Pid) end),
   
  -    ?line [self() ! {msg,N} || N <- lists:seq(1, 500000)],
  +    [self() ! {msg,N} || N <- lists:seq(1, 500000)],
       erlang:garbage_collect(),
  -    ?line {NewTime1,ok} = tc(fun() -> calls(10, Pid) end),
  -    ?line {NewTime2,ok} = tc(fun() -> calls(10, Pid) end),
  +    {NewTime1,ok} = tc(fun() -> calls(10, Pid) end),
  +    {NewTime2,ok} = tc(fun() -> calls(10, Pid) end),
   
       io:format("Time for empty message queue: ~p", [Time]),
       io:format("Time1 for huge message queue: ~p", [NewTime1]),
  
positive.code: 	    ok;
  	Q ->
  	    io:format("Best Q = ~p", [Q]),
  	    ?line ?t:fail()
      end,
      ok.
  
  
negative.code:     end.
  
  receive_in_between(Config) when is_list(Config) ->
      Pid = spawn_link(fun echo_loop/0),
      [{ok,{a,b}} = call2(Pid, {a,b}) || _ <- lists:seq(1, 100000)],
      ok.
  
  call2(Pid, Msg) ->
  