Function: icon-backward-to-noncomment

icon-backward-to-noncomment is a byte-compiled function defined in icon.el.gz.

Signature

(icon-backward-to-noncomment LIM)

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/icon.el.gz
(defun icon-backward-to-noncomment (lim)
  (let (opoint stop)
    (while (not stop)
      (skip-chars-backward " \t\n\f" lim)
      (setq opoint (point))
      (beginning-of-line)
      (if (and (nth 5 (parse-partial-sexp (point) opoint))
	       (< lim (point)))
	  (search-backward "#")
	(setq stop t)))))