Function: ses--clean-_

ses--clean-_ is a byte-compiled function defined in ses.el.gz.

Signature

(ses--clean-_ X Y)

Documentation

Clean list X by replacing by Y any occurrence of nil or *skip*.

This will change X by making setcar on its cons cells.

Source Code

;; Defined in /usr/src/emacs/lisp/ses.el.gz
(defun ses--clean-_ (x y)
  "Clean list X  by replacing by Y any occurrence of nil or `*skip*'.

This will change X by making `setcar' on its cons cells."
  (let ((ret x) ret-elt)
    (while ret
      (setq ret-elt (car ret))
      (when (memq ret-elt '(nil *skip*))
	(setcar ret y))
      (setq ret (cdr ret))))
  x)