anchor.diff:  %%     {_, Row} = lists:foldl(F, {1, []}, Fields),
   %%     unpack_rows(Fields, T, [lists:reverse(Row)|Accum]).
   
  +-spec unpack_rows([], [array()]) -> [[tuple()]].
   unpack_rows(Columns, RowData) ->
       Rows = [ lists:zip(Columns, Row) || Row <- RowData ], 
       ?debugVal(Rows),
  
positive.code:             load_statements(Connection, T, dict:store(Name, {Columns, Statement}, Dict));
          Error ->
              %% TODO: Discover what errors can flow out of this, and write tests.
              Error
      end.
  
  %% Converts contents of result_packet into our "standard"
  
negative.code:             erlang:link(Connection),
              erlang:process_flag(trap_exit, true),
              {ok, Statements} = file:consult(PreparedStatementFile),
              {ok, Prepared} = load_statements(Connection, Statements, dict:new()),
              {ok, #state{cn=Connection, statements=Prepared}}
      end.
  
  %% Internal functions
  -spec load_statements(connection(), [tuple()], dict()) -> {ok, dict()} |  {error, any()}.                           
  load_statements(_Connection, [], Dict) ->
      {ok, Dict};
  load_statements(Connection, [{Name, SQL}|T], Dict) when is_atom(Name) ->
      case pgsql:parse(Connection, atom_to_list(Name), SQL, []) of
          {ok, Statement} ->
              {ok, {statement, _Name, Desc}} = pgsql:describe(Connection, Statement),
  