Function: dash--zip-lists-or-pair

dash--zip-lists-or-pair is a byte-compiled function defined in dash.el.

Signature

(dash--zip-lists-or-pair FORM &rest LISTS)

Documentation

Return a form equivalent to applying -zip to LISTS.

This compiler-macro warns about discouraged -zip usage and delegates to -zip-lists or -zip-pair depending on the number of LISTS.

Source Code

;; Defined in ~/.emacs.d/elpa/dash-20260221.1346/dash.el
(defun dash--zip-lists-or-pair (_form &rest lists)
  "Return a form equivalent to applying `-zip' to LISTS.
This `compiler-macro' warns about discouraged `-zip' usage and
delegates to `-zip-lists' or `-zip-pair' depending on the number
of LISTS."
  (if (not (dash--length= lists 2))
      (cons #'-zip-lists lists)
    (let ((pair (cons #'-zip-pair lists))
          (msg "Use -zip-pair instead of -zip to get a list of pairs"))
      (if (fboundp 'macroexp-warn-and-return)
          (macroexp-warn-and-return msg pair)
        (message msg)
        pair))))