anchor.diff:  	gen_statem:start(LocalSTM, ?MODULE, start_arg(Config, []), []),
   
       %% timeout call.
  -    delayed = gen_statem:call(Name, {delayed_answer,1}, 100),
  +    delayed = gen_statem:call(Name, {delayed_answer,100}, 2000),
       {timeout,_} =
   	?EXPECT_FAILURE(
  -	   gen_statem:call(Name, {delayed_answer,1000}, 10),
  +	   gen_statem:call(Name, {delayed_answer,2000}, 100),
   	   Reason),
       ok = gen_statem:stop(Name),
       ?t:sleep(1100),
  
positive.code:     {keep_state, Data};
  idle({call, From}, hping, _Data) ->
      {keep_state_and_data, [{reply, From, hpong}]};
  idle({call, From}, {arm_htimer, Pid, Timeout}, _Data) ->
      {keep_state_and_data, [{reply, From, ok}, {timeout, Timeout, {arm_htimer, Pid}}]};
  idle(timeout, {arm_htimer, Pid}, _Data) ->
      Pid ! {self(), htimer_armed},
      keep_state_and_data;
  idle(cast, {connect,Pid}, Data) ->
      Pid ! accept,
  
negative.code:     true =
  	({current_function,{erlang,hibernate,3}} =/=
  	     erlang:process_info(Pid, current_function)),
      wait_erlang_hibernate(Pid),
  
      'alive!' = gen_statem:call(Pid, 'alive?'),
      true =
  	({current_function,{erlang,hibernate,3}} =/=
  	     erlang:process_info(Pid, current_function)),
      Pid ! hibernate_now,
      wait_erlang_hibernate(Pid),
  
      'alive!' = gen_statem:call(Pid, 'alive?'),
      true =
  