Function: vhdl-delete

vhdl-delete is a byte-compiled function defined in vhdl-mode.el.gz.

Signature

(vhdl-delete ELT LIST)

Documentation

Delete by side effect the first occurrence of ELT as a member of LIST.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/vhdl-mode.el.gz
(defun vhdl-delete (elt list)
  "Delete by side effect the first occurrence of ELT as a member of LIST."
  (push nil list)
  (let ((list1 list))
    (while (and (cdr list1) (not (equal elt (cadr list1))))
      (setq list1 (cdr list1)))
    (when list
      (setcdr list1 (cddr list1))))
  (cdr list))