Method: (DB-ASSOCIATE DB-STD DB T)

Source

(defmethod db-associate ((primary db-std) (secondary db) callback &key
			 txn create (use-cbuffer t) callback-maker callback-name)
  (let ((make-callback (cond ((not (null callback-maker)) callback-maker)
			     (use-cbuffer #'create-cbuffered-db-assoc-callback)
			     (t #'create-db-assoc-callback))))
    (%db-associate primary txn secondary
		   (if (pointerp callback)
		       callback
		       (funcall make-callback callback callback-name))
		   :create create)))