anchor.diff:      end.
   
   delete_database(Filename) ->
  -    Cmd = <<(list_to_binary(Filename))/binary, 0:8>>, 
  +    Cmd = <<(list_to_binary(Filename))/binary, 0:8>>,
       <<Rc:32/signed-native>> = erlang:port_control(get_port(), ?CMD_REMOVE_DB, Cmd),
       case decode_rc(Rc) of
           ok ->
  
positive.code: 
  -export([open/2, open/3,
           close/1, close/2,
           txn_begin/0, txn_begin/1, 
           txn_commit/0, txn_commit/1, txn_abort/0,
           get_cache_size/0, get_data_dirs/0,
           get_txn_timeout/0, set_txn_timeout/1,
           transaction/1, transaction/2,
           put/3, put/4,
           put_r/3, put_r/4,
           put_commit/3, put_commit/4, 
           put_commit_r/3, put_commit_r/4,
           get/2, get/3,
           get_r/2, get_r/3,
  
negative.code:             {error, Reason}
      end.
  
  get_cache_size() ->
      Cmd = <<?SYSP_CACHESIZE_GET:32/signed-native>>,
      <<Result:32/signed-native, Gbytes:32/native, Bytes:32/native, Ncaches:32/native>> =
          erlang:port_control(get_port(), ?CMD_TUNE, Cmd),
      case Result of
          0 ->
  