94 |
(defun flymake-split-string(str pattern) |
(defun flymake-split-string(str pattern) |
95 |
(cond |
(cond |
96 |
((equal flymake-emacs 'xemacs) (flymake-split-string-remove-empty-edges str pattern)) |
((equal flymake-emacs 'xemacs) (flymake-split-string-remove-empty-edges str pattern)) |
97 |
(t (split-string str pattern)) |
(t (flymake-split-string-remove-empty-edges str pattern)) |
98 |
) |
) |
99 |
) |
) |
100 |
|
|
1243 |
(" *\\(\\[javac\\]\\)? *\\(\\([a-zA-Z]:\\)?[^:(\t\n]+\\)\:\\([0-9]+\\)\:[ \t\n]*\\(.+\\)" |
(" *\\(\\[javac\\]\\)? *\\(\\([a-zA-Z]:\\)?[^:(\t\n]+\\)\:\\([0-9]+\\)\:[ \t\n]*\\(.+\\)" |
1244 |
2 4 nil 5) |
2 4 nil 5) |
1245 |
) |
) |
1246 |
compilation-error-regexp-alist) |
;; compilation-error-regexp-alist) |
1247 |
|
(mapcar (lambda (x) (cdr x)) compilation-error-regexp-alist-alist)) |
1248 |
"patterns for matching error/warning lines, (regexp file-idx line-idx err-text-idx)" |
"patterns for matching error/warning lines, (regexp file-idx line-idx err-text-idx)" |
1249 |
) |
) |
1250 |
;(defcustom flymake-err-line-patterns |
;(defcustom flymake-err-line-patterns |