Function: BUILD-DEL-FUNCTION

Source

(defun build-del-function (write-fn)
  (lambda (db key &key txn)
    (with-cbuffer key-buffer
      (funcall write-fn key key-buffer)
      (db-del db key-buffer :txn txn))))