Function: hif-delete-char-in-string

hif-delete-char-in-string is a byte-compiled function defined in hideif.el.gz.

Signature

(hif-delete-char-in-string CHAR STRING)

Documentation

Delete CHAR in STRING inplace.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/hideif.el.gz
(defun hif-delete-char-in-string (char string)
  "Delete CHAR in STRING inplace."
  (let ((i (length string))
        (s nil))
    (while (> i 0)
      (setq i (1- i))
      (unless (eq (aref string i) char)
        (setq s (cons (aref string i) s))))
    (concat s)))