anchor.diff:      {ok, newvalue} = bdberl:update(Db, mykey, F),
       {ok, newvalue} = bdberl:get(Db, mykey).
   
  +port_should_tune_transaction_timeouts(_Config) ->
  +    %% Test transaction timeouts
  +    {ok, 500000} = bdberl:get_txn_timeout(),
  +    ok = bdberl:set_txn_timeout(250000),
  +    {ok, 250000} = bdberl:get_txn_timeout().
  
positive.code: open_should_create_database_if_none_exists(_Config) ->
      true = filelib:is_file("api_test.db").
  
  get_should_fail_when_getting_a_nonexistant_record(Config) ->
      not_found = bdberl:get(?config(db, Config), bad_key).
  
  
negative.code:     Db = ?config(db, Config),
      ok = bdberl:put(Db, mykey, avalue),
      {ok, avalue} = bdberl:get(Db, mykey).
  
  put_should_succeed_with_manual_transaction(Config) ->
      Db = ?config(db, Config),
      ok = bdberl:txn_begin(),
      ok = bdberl:put(Db, mykey, avalue),
      ok = bdberl:txn_commit(),
      {ok, avalue} = bdberl:get(Db, mykey).
  
  put_should_rollback_with_failed_manual_transaction(Config) ->
      Db = ?config(db, Config),
      ok = bdberl:txn_begin(),
      ok = bdberl:put(Db, mykey, avalue),
      ok = bdberl:txn_abort(),
      not_found = bdberl:get(Db, mykey).
  
  transaction_should_commit_on_success(Config) ->
      Db = ?config(db, Config),
  