(defcfun "db_strerr" :string (error :int))
(defcfun "bdb_version_major" :int)
(defcfun "bdb_verions_minor" :int)
(defcfun "bdb_version_patch" :int)
(defcfun "bdb_version_string" :string)
(defcfun+ ("bdb_version" bdb-version) :string (major :out :int) (minor :out :int) (patch :out :int))