… | |
… | |
66 | |
66 | |
67 | BEGIN { |
67 | BEGIN { |
68 | our $VERSION = '0.1'; |
68 | our $VERSION = '0.1'; |
69 | |
69 | |
70 | our @BDB_REQ = qw( |
70 | our @BDB_REQ = qw( |
71 | db_env_create db_env_open db_env_close |
71 | db_env_open db_env_close db_env_txn_checkpoint db_env_lock_detect |
|
|
72 | db_env_memp_sync db_env_memp_trickle |
72 | db_create db_open db_close db_compact db_sync db_put db_get db_pget db_del |
73 | db_open db_close db_compact db_sync db_put db_get db_pget db_del db_key_range |
73 | db_txn_commit db_txn_abort |
74 | db_txn_commit db_txn_abort |
74 | db_c_close db_c_count db_c_put db_c_get db_c_pget db_c_del |
75 | db_c_close db_c_count db_c_put db_c_get db_c_pget db_c_del |
|
|
76 | db_sequence_open db_sequence_close |
|
|
77 | db_sequence_get db_sequence_remove |
75 | ); |
78 | ); |
76 | our @EXPORT = (@BDB_REQ, qw(dbreq_pri dbreq_nice)); |
79 | our @EXPORT = (@BDB_REQ, qw(dbreq_pri dbreq_nice db_env_create db_create)); |
|
|
80 | our @EXPORT_OK = qw( |
77 | our @EXPORT_OK = qw(poll_fileno poll_cb poll_wait flush |
81 | poll_fileno poll_cb poll_wait flush |
78 | min_parallel max_parallel max_idle |
82 | min_parallel max_parallel max_idle |
79 | nreqs nready npending nthreads |
83 | nreqs nready npending nthreads |
80 | max_poll_time max_poll_reqs); |
84 | max_poll_time max_poll_reqs |
|
|
85 | ); |
81 | |
86 | |
82 | require XSLoader; |
87 | require XSLoader; |
83 | XSLoader::load ("BDB", $VERSION); |
88 | XSLoader::load ("BDB", $VERSION); |
84 | } |
89 | } |
85 | |
90 | |