Mercurial > emacs
changeset 87644:bd942570a8d9
Kevin Ryde <user42 at zip.com.au>:
(compilation-error-regexp-alist-alist): Add entry for two-arg form of
the Test module ok() func.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Tue, 08 Jan 2008 08:03:12 +0000 |
| parents | 8dd090420a99 |
| children | 19c6f8f4f7c7 |
| files | lisp/progmodes/compile.el |
| diffstat | 1 files changed, 11 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/compile.el Tue Jan 08 07:54:36 2008 +0000 +++ b/lisp/progmodes/compile.el Tue Jan 08 08:03:12 2008 +0000 @@ -370,6 +370,17 @@ ;; "^# Failed test [0-9]+ in \\([^ \t\r\n]+\\) at line \\([0-9]+\\)" 1 2) + (compilation-perl--Test2 + ;; Or when comparing got/want values, + ;; # Test 2 got: "xx" (t-compilation-perl-2.t at line 10) + ;; + ;; And under Test::Harness they're preceded by progress stuff with + ;; \r and "NOK", + ;; ... NOK 1# Test 1 got: "1234" (t/foo.t at line 46) + ;; + "^\\(.*NOK.*\\)?# Test [0-9]+ got:.* (\\([^ \t\r\n]+\\) at line \ +\\([0-9]+\\))" + 2 3) (compilation-perl--Test::Harness ;; perl Test::Harness output, eg. ;; NOK 1# Test 1 got: "1234" (t/foo.t at line 46)