Function: dash--table-carry

dash--table-carry is a byte-compiled function defined in dash.el.

Signature

(dash--table-carry LISTS RESTORE-LISTS &optional RE)

Documentation

Helper for -table and -table-flat.

If a list overflows, carry to the right and reset the list.

Source Code

;; Defined in ~/.emacs.d/elpa/dash-20260221.1346/dash.el
(defun dash--table-carry (lists restore-lists &optional re)
  "Helper for `-table' and `-table-flat'.

If a list overflows, carry to the right and reset the list."
  (while (not (or (car lists)
                  (equal lists '(nil))))
    (setcar lists (car restore-lists))
    (pop (cadr lists))
    (!cdr lists)
    (!cdr restore-lists)
    (when re
      (push (nreverse (car re)) (cadr re))
      (setcar re nil)
      (!cdr re))))