anchor.diff:                  ["Mark", "Anderson", 42, <<"2011-10-02 16:47:46">>, true],
                   ["Chris", "Maier", 0, <<"2011-10-03 16:47:46">>, true],
                   ["Elvis", "Presley", 16, <<"2011-10-04 16:47:46">>, false]]).
  +-define(MAX_POOL_COUNT, 3).
   
   -compile([export_all]).
   
  
positive.code:       }
       ]}.
  
  insert_data() ->
      Expected = lists:duplicate(4, {ok, 1}),
      ?assertMatch(Expected, [sqerl:statement(new_user, Name) || Name <- ?NAMES]).
  
negative.code:      fun() -> error_logger:tty(true) end,
       fun(_) -> error_logger:tty(true) end,
       [
        {<<"Connection pool overflow">>,
         fun pool_overflow/0},
        {<<"Insert operations">>,
         fun insert_data/0},
        {<<"Select operations">>,
  