anchor.diff:  handle_call(_Request, _From, State) ->
       {noreply, ok, State}.
   
  -handle_cast(heartbeat,
  -    #state{heartbeat_sock=HeartbeatSock, beat_count=Count, private_key=PrivateKey}=State) ->
  -    {ok, Hostname} = inet:gethostname(),
  -    Msg = {[{server, list_to_binary(Hostname)},
  -            {timestamp, list_to_binary(httpd_util:rfc1123_date())},
  -            {type, heartbeat}]},
  -    % JSON encode message
  -    BodyFrame = jiffy:encode(Msg),
  -
  -    % Send Header (including signed checksum)
  -    HeaderParts = sign_message(PrivateKey, BodyFrame),
  -    Headers = [join_bins(tuple_to_list(Part), <<":">>) || Part <- HeaderParts],
  -    HeaderFrame = join_bins(Headers, <<";">>),
  -    pushy_messaging:send_message(HeartbeatSock, [HeaderFrame, BodyFrame]),
  -    %?debugVal(BodyFrame),
  -    %error_logger:info_msg("Heartbeat sent: header=~s,body=~s~n",[HeaderFrame, BodyFrame]),
  -    {noreply, State#state{beat_count=Count+1}};
  +handle_cast(heartbeat, State) ->
  +    {noreply, ?TIME_IT(?MODULE, do_send, (State))};
   handle_cast(_Msg, State) ->
       {noreply, State}.
   
  
positive.code:          code_change/3]).
  
  -include_lib("eunit/include/eunit.hrl").
  
  -record(state,
          {heartbeat_sock,
  
negative.code:         ]).
  
  %% ------------------------------------------------------------------
  %% Private Exports - only exported for instrumentation
  %% ------------------------------------------------------------------
  
  -export([do_send/1]).
  
  %% ------------------------------------------------------------------
  %% gen_server Function Exports
  %% ------------------------------------------------------------------
  
  