Method: (DB-CURSOR DB-EXT)

Source

(defmethod db-cursor ((db db-ext) &key txn write)
  (make-instance 'ext-cursor
		 :handle (%db-cursor (if (is-secondary db)
					 (db-sec-handle db)
					 (db-handle db))
				     txn
				     :write write)
		 :env (db-get-env db)))