diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2020-02-15 16:08:14 +0100 |
|---|---|---|
| committer | Mattias Engdegård <mattiase@acm.org> | 2020-02-17 11:23:41 +0100 |
| commit | f765aad28baf946666eb225b97228038167fade8 (patch) | |
| tree | 0c32ae8b0077c7dd5a80e657aae9796e60d140d4 /test/lisp/progmodes/compile-tests.el | |
| parent | 39410cfc5a7a2a721f9f50e36d2d48dc33980e08 (diff) | |
| download | emacs-f765aad28baf946666eb225b97228038167fade8.tar.gz | |
Make OMake support slightly less expensive (bug#39595)
When run with -p or -P, OMake regurgitates error messages that
prevented further progress, indented by 6 spaces. Use that fact
to ameliorate the modification done to other error message regexps.
* lisp/progmodes/compile.el (compilation-parse-errors):
When 'omake' is enabled, allow error messages to be indented by 0 or 6
spaces instead of any number of spaces, to avoid pathological
behaviour.
(compilation-error-regexp-alist-alist): Anchor the 'omake' pattern to
bol for performance. Repair the 'ruby-Test::Unit' pattern, which
relied on the previously over-generous 'omake' hack.
* etc/compilation.txt (OMake): Add examples.
* test/lisp/progmodes/compile-tests.el (compile-tests--test-regexps-data)
(compile-test-error-regexps): Add test for OMake (indented error).
Diffstat (limited to 'test/lisp/progmodes/compile-tests.el')
| -rw-r--r-- | test/lisp/progmodes/compile-tests.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/test/lisp/progmodes/compile-tests.el b/test/lisp/progmodes/compile-tests.el index c3cec01f8b0..75962566f14 100644 --- a/test/lisp/progmodes/compile-tests.el +++ b/test/lisp/progmodes/compile-tests.el @@ -269,6 +269,9 @@ 1 nil 109 "..\\src\\ctrl\\lister.c") ("..\\src\\ctrl\\lister.c(120): Warning! W201: Unreachable code" 1 nil 120 "..\\src\\ctrl\\lister.c") + ;; omake + (" alpha.c:5:15: error: expected ';' after expression" + 1 15 5 "alpha.c") ;; oracle ("Semantic error at line 528, column 5, file erosacqdb.pc:" 1 5 528 "erosacqdb.pc") @@ -428,7 +431,7 @@ The test data is in `compile-tests--test-regexps-data'." (compilation-num-warnings-found 0) (compilation-num-infos-found 0)) (mapc #'compile--test-error-line compile-tests--test-regexps-data) - (should (eq compilation-num-errors-found 92)) + (should (eq compilation-num-errors-found 93)) (should (eq compilation-num-warnings-found 36)) (should (eq compilation-num-infos-found 26))))) |