Function: nrepl-dict-merge

nrepl-dict-merge is a byte-compiled function defined in nrepl-dict.el.

Signature

(nrepl-dict-merge DICT1 DICT2)

Documentation

Destructively merge DICT2 into DICT1.

Keys in DICT2 override those in DICT1.

Source Code

;; Defined in ~/.emacs.d/elpa/cider-20260822.1520/nrepl-dict.el
(defun nrepl-dict-merge (dict1 dict2)
  "Destructively merge DICT2 into DICT1.
Keys in DICT2 override those in DICT1."
  ;; Allocate a fresh dict when DICT1 is nil.  Using the quoted literal
  ;; `\='(dict)' here would be mutated in place by `nrepl-dict-put', polluting
  ;; the shared constant for every later nil-seeded merge in the session.
  (let ((base (or dict1 (nrepl-dict))))
    (nrepl-dict-map (lambda (k v)
                      (nrepl-dict-put base k v))
                    (or dict2 (nrepl-dict)))
    base))