anchor.diff:  
   -export([start_link/2, start_link/3, stop/1]).
   -export([get_connection/1, get_connection/2, return_connection/2]).
  --export([get_database/1]).
  +-export([get_database/1, status/1]).
   
   -export([init/1, code_change/3, terminate/2]). 
   -export([handle_call/3, handle_cast/2, handle_info/2]).
  
positive.code: 			end
      end;
  
  %% Trap unsupported calls
  handle_call(Request, _From, State) ->
      {stop, {unsupported_call, Request}, State}.
  
negative.code:     {ok, Db} = pgsql_connection:database(C),
      return_connection(P, C),
      {ok, Db}.
  
  
  %% @doc Return the current status of the connection pool.
  status(P) ->
      gen_server:call(P, status).
      
  
  %% -- gen_server implementation --
  
  