diff options
| author | Glenn Morris | 2009-08-22 19:21:18 +0000 |
|---|---|---|
| committer | Glenn Morris | 2009-08-22 19:21:18 +0000 |
| commit | a569b4801085fa14c3bd0d153e389636645908b9 (patch) | |
| tree | 00cd2da802ba03bb10ac4f2251be79495ff4d1c9 | |
| parent | df1c29a0a0cfc2ad8302e85b794ff3bc76126333 (diff) | |
| download | emacs-a569b4801085fa14c3bd0d153e389636645908b9.tar.gz emacs-a569b4801085fa14c3bd0d153e389636645908b9.zip | |
(compilation-error-regexp-alist, compilation-forget-errors): Declare.
| -rw-r--r-- | lisp/progmodes/prolog.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/progmodes/prolog.el b/lisp/progmodes/prolog.el index d422d85b13a..53a010abdac 100644 --- a/lisp/progmodes/prolog.el +++ b/lisp/progmodes/prolog.el | |||
| @@ -247,6 +247,7 @@ rigidly along with this one (not yet)." | |||
| 247 | (declare-function comint-send-string "comint" (process string)) | 247 | (declare-function comint-send-string "comint" (process string)) |
| 248 | (declare-function comint-send-region "comint" (process start end)) | 248 | (declare-function comint-send-region "comint" (process start end)) |
| 249 | (declare-function comint-send-eof "comint" ()) | 249 | (declare-function comint-send-eof "comint" ()) |
| 250 | (defvar compilation-error-regexp-alist) | ||
| 250 | 251 | ||
| 251 | (define-derived-mode inferior-prolog-mode comint-mode "Inferior Prolog" | 252 | (define-derived-mode inferior-prolog-mode comint-mode "Inferior Prolog" |
| 252 | "Major mode for interacting with an inferior Prolog process. | 253 | "Major mode for interacting with an inferior Prolog process. |
| @@ -394,6 +395,9 @@ If COMPILE (prefix arg) is not nil, use compile mode rather than consult mode." | |||
| 394 | (prolog-consult-region compile beg end) | 395 | (prolog-consult-region compile beg end) |
| 395 | (pop-to-buffer inferior-prolog-buffer)) | 396 | (pop-to-buffer inferior-prolog-buffer)) |
| 396 | 397 | ||
| 398 | ;; inferior-prolog-mode uses the autoloaded compilation-shell-minor-mode. | ||
| 399 | (declare-function compilation-forget-errors "compile" ()) | ||
| 400 | |||
| 397 | (defun inferior-prolog-load-file () | 401 | (defun inferior-prolog-load-file () |
| 398 | "Pass the current buffer's file to the inferior prolog process." | 402 | "Pass the current buffer's file to the inferior prolog process." |
| 399 | (interactive) | 403 | (interactive) |