/[emacs]/emacs/lisp/progmodes/compile.el
ViewVC logotype

Diff of /emacs/lisp/progmodes/compile.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.256.2.20 by miles, Tue Jul 6 09:31:24 2004 UTC revision 1.256.2.21 by miles, Tue Jul 6 10:00:21 2004 UTC
# Line 210  of[ \t]+\"?\\([a-zA-Z]?:?[^\":\n]+\\)\"? Line 210  of[ \t]+\"?\\([a-zA-Z]?:?[^\":\n]+\\)\"?
210    
211      (gnu      (gnu
212       "^\\(?:[[:alpha:]][-[:alnum:].]+: ?\\)?\       "^\\(?:[[:alpha:]][-[:alnum:].]+: ?\\)?\
213  \\([/.]*[a-zA-Z]:?[^ \t\n:]*\\): ?\  \\([/.]*[a-zA-Z]:?[^ \t\n:]*\\|{standard input}\\): ?\
214  \\([0-9]+\\)\\([.:]?\\)\\([0-9]+\\)?\  \\([0-9]+\\)\\([.:]?\\)\\([0-9]+\\)?\
215  \\(?:-\\(?:\\([0-9]+\\)\\3\\)?\\.?\\([0-9]+\\)?\\)?:\  \\(?:-\\(?:\\([0-9]+\\)\\3\\)?\\.?\\([0-9]+\\)?\\)?:\
216  \\(?: *\\(\\(?:Future\\|Runtime\\)?[Ww]arning\\|W:\\)\\|\  \\(?: *\\(\\(?:Future\\|Runtime\\)?[Ww]arning\\|W:\\)\\|\
# Line 242  of[ \t]+\"?\\([a-zA-Z]?:?[^\":\n]+\\)\"? Line 242  of[ \t]+\"?\\([a-zA-Z]?:?[^\":\n]+\\)\"?
242  : \\(?:error\\|warnin\\(g\\)\\) C[0-9]+:" 1 2 nil (3))  : \\(?:error\\|warnin\\(g\\)\\) C[0-9]+:" 1 2 nil (3))
243    
244      (oracle      (oracle
245       "^Semantic error at line \\([0-9]+\\), column \\([0-9]+\\), file \\(.*\\):$"       "^\\(?:Semantic error\\|Error\\|PCC-[0-9]+:\\).* line \\([0-9]+\\)\
246    \\(?:\\(?:,\\| at\\)? column \\([0-9]+\\)\\)?\
247    \\(?:,\\| in\\| of\\)? file \\(.*?\\):?$"
248       3 1 2)       3 1 2)
249    
250      (perl      (perl
# Line 988  exited abnormally with code %d\n" Line 990  exited abnormally with code %d\n"
990           ;; If window is alone in its frame, aside from a minibuffer,           ;; If window is alone in its frame, aside from a minibuffer,
991           ;; don't change its height.           ;; don't change its height.
992           (not (eq window (frame-root-window (window-frame window))))           (not (eq window (frame-root-window (window-frame window))))
993           ;; This save-current-buffer prevents us from changing the current           ;; Stef said that doing the saves in this order is safer:
994           ;; buffer, which might not be the same as the selected window's buffer.           (save-excursion
          (save-current-buffer  
995             (save-selected-window             (save-selected-window
996               (save-excursion               (select-window window)
997                 (select-window window)               (enlarge-window (- height (window-height))))))))
                (enlarge-window (- height (window-height)))))))))  
998    
999  (defvar compilation-menu-map  (defvar compilation-menu-map
1000    (let ((map (make-sparse-keymap "Errors")))    (let ((map (make-sparse-keymap "Errors")))

Legend:
Removed from v.1.256.2.20  
changed lines
  Added in v.1.256.2.21

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26