Function: EXT-UPDATE-SECONDARY

Source

(defun ext-update-secondary (db-and-callback key data key-buffer txn)
  (multiple-value-call
      (lambda (use ret)
	(multiple-value-call (lambda (use buf) (put-into-secondary
					   (car db-and-callback)
					   use buf key-buffer txn))
	  (make-return-buffer (buf-writer (car db-and-callback))
			      use ret)))
    (funcall (cdr db-and-callback) (car db-and-callback) key data)))
Source Context