anchor.diff:  
   initializing(timeout, State) ->
       Error = {error, timeout},
  -    {stop, Error, reply(State, Error)};
  +    {stop, Error, gen_reply(State, Error)};
   
   %% ReadyForQuery
   initializing({$Z, <<Status:8>>}, State) ->
  
positive.code:         _ -> Method = unknown
      end,
      Error = {error, {unsupported_auth_method, Method}},
      {stop, Error, reply(State, Error)};
  
  %% ErrorResponse
  auth({error, E}, State) ->
  
negative.code:     Pid ! Message,
      State#state{queue = Q2}.
  
  gen_reply(#state{queue = Q} = State, Message) ->
      {{value, From}, Q2} = queue:out(Q),
      gen_server:reply(From, Message),
      State#state{queue = Q2}.
  
  notify_async(#state{async = Pid}, Msg) ->
      case is_pid(Pid) of
          true  -> Pid ! {pgsql, self(), Msg};
  