Function: idlwave-shell-goto-next-error
idlwave-shell-goto-next-error is an interactive and byte-compiled
function defined in idlw-shell.el.gz.
Signature
(idlwave-shell-goto-next-error)
Documentation
Move point to next IDL syntax error.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/progmodes/idlw-shell.el.gz
(defun idlwave-shell-goto-next-error ()
"Move point to next IDL syntax error."
(interactive)
(let (frame col)
(with-current-buffer idlwave-shell-error-buffer
(goto-char idlwave-shell-error-last)
(if (or
(re-search-forward idlwave-shell-syntax-error nil t)
(re-search-forward idlwave-shell-other-error nil t))
(progn
(setq frame
(list
(save-match-data
(idlwave-shell-file-name
(buffer-substring (match-beginning 1 )
(match-end 1))))
(string-to-number
(buffer-substring (match-beginning 2)
(match-end 2)))))
;; Try to find the column of the error
(save-excursion
(setq col
(if (re-search-backward "\\^" nil t)
(current-column)
0)))))
(setq idlwave-shell-error-last (point)))
(if frame
(progn
(idlwave-shell-display-line frame col 'disable))
(beep)
(message "No more errors."))))