(defmethod db-associate ((primary db-txn) (secondary db-txn) callback &key txn create) (bdb::db-associate primary secondary (create-assoc-lambda callback) :txn txn :create create))