[elpa] externals/csharp-mode 69eaa1a 080/459: Add tests for compilation-mode regexps.

[ELPA Syncer]

branch: externals/csharp-mode
commit 69eaa1a7f7d66dda295b5674bdf9ad398e632e76
Author: Jostein Kjønigsen <jostein@kjonigsen.net>
Commit: Jostein Kjønigsen <jostein@kjonigsen.net>

    Add tests for compilation-mode regexps.
---
 csharp-mode-tests.el           | 18 +++++++++++++++++-
 test-files/msbuild-error.txt   |  2 +-
 test-files/msbuild-warning.txt |  2 +-
 test-files/xbuild-error.txt    |  2 +-
 test-files/xbuild-warning.txt  |  2 +-
 5 files changed, 21 insertions(+), 5 deletions(-)

diff --git a/csharp-mode-tests.el b/csharp-mode-tests.el
index 0662b6f..2021732 100644
--- a/csharp-mode-tests.el
+++ b/csharp-mode-tests.el
@@ -10,7 +10,7 @@
 
 (defun get-current-line-contents ()
   (let* ((start)
-        (end))
+         (end))
     (move-beginning-of-line 1)
     (setq start (point))
     (move-end-of-line 1)
@@ -49,5 +49,21 @@
       (should
        (equal buffer1 buffer2)))))
 
+(ert-deftest build-warnings-and-errors-are-parsed ()
+  (dolist (test-case
+          `(("./test-files/msbuild-warning.txt" 
,csharp-compilation-re-msbuild-warning 3)
+            ("./test-files/msbuild-error.txt" 
,csharp-compilation-re-msbuild-error 1)
+            ("./test-files/xbuild-warning.txt" 
,csharp-compilation-re-xbuild-warning 5)
+            ("./test-files/xbuild-error.txt" 
,csharp-compilation-re-xbuild-error 1)
+            ))
+
+    (let* ((file-name (car test-case))
+          (regexp    (cadr test-case))
+          (times     (caddr test-case))
+          (find-file-hook '()) ;; avoid vc-mode file-hooks when opening!
+          (buffer (find-file-read-only file-name)))
+      (dotimes (number times)
+       (re-search-forward regexp))
+      (kill-buffer buffer))))
 
 ;;(ert-run-tests-interactively t)
diff --git a/test-files/msbuild-error.txt b/test-files/msbuild-error.txt
index d1ea947..db60400 100644
--- a/test-files/msbuild-error.txt
+++ b/test-files/msbuild-error.txt
@@ -1,4 +1,4 @@
--*- mode: compilation; default-directory: 
"~/Dropbox/barfapp/ConsoleApplication1/ConsoleApplication1/" -*-
+-*- xmode: compilation; default-directory: 
"~/Dropbox/barfapp/ConsoleApplication1/ConsoleApplication1/" -*-
 Compilation started at Sat Feb 21 10:26:47
 
 "C:\Program Files (x86)\MSBuild\12.0\Bin\Msbuild.exe"
diff --git a/test-files/msbuild-warning.txt b/test-files/msbuild-warning.txt
index 0f46911..2411806 100644
--- a/test-files/msbuild-warning.txt
+++ b/test-files/msbuild-warning.txt
@@ -1,4 +1,4 @@
--*- mode: compilation; default-directory: 
"~/Dropbox/barfapp/ConsoleApplication1/ConsoleApplication1/" -*-
+-*- xmode: compilation; default-directory: 
"~/Dropbox/barfapp/ConsoleApplication1/ConsoleApplication1/" -*-
 Compilation started at Sat Feb 21 10:24:14
 
 "C:\Program Files (x86)\MSBuild\12.0\Bin\Msbuild.exe"
diff --git a/test-files/xbuild-error.txt b/test-files/xbuild-error.txt
index ed14e16..77a366e 100644
--- a/test-files/xbuild-error.txt
+++ b/test-files/xbuild-error.txt
@@ -1,4 +1,4 @@
--*- mode: compilation; default-directory: 
"~/Dropbox/barfapp/ConsoleApplication1/ConsoleApplication1/" -*-
+-*- xmode: compilation; default-directory: 
"~/Dropbox/barfapp/ConsoleApplication1/ConsoleApplication1/" -*-
 Compilation started at Fri Feb 20 22:52:43
 
 xbuild /p:GenerateFullPaths=true
diff --git a/test-files/xbuild-warning.txt b/test-files/xbuild-warning.txt
index cc466ea..5a77ba2 100644
--- a/test-files/xbuild-warning.txt
+++ b/test-files/xbuild-warning.txt
@@ -1,4 +1,4 @@
--*- mode: compilation; default-directory: 
"~/Dropbox/barfapp/ConsoleApplication1/ConsoleApplication1/" -*-
+-*- xmode: compilation; default-directory: 
"~/Dropbox/barfapp/ConsoleApplication1/ConsoleApplication1/" -*-
 Compilation started at Fri Feb 20 22:55:05
 
 xbuild /p:GenerateFullPaths=true