Factor out function to check for clang in tests

This also stops a flymake test from failing on my machine.

* lisp/emacs-lisp/ert-x.el (ert-gcc-is-clang-p): New function
factored out from ...
* test/lisp/progmodes/flymake-tests.el (flymake-tests--gcc-is-clang):
* test/lisp/cedet/semantic/bovine/gcc-tests.el
(semantic-gcc-test-output-parser-this-machine): ... here.

* test/lisp/progmodes/flymake-tests.el (different-diagnostic-types)
(included-c-header-files):
* test/lisp/cedet/semantic/bovine/gcc-tests.el
(semantic-gcc-test-output-parser-this-machine): Use above new function.

1 files changed, 3 insertions, 8 deletions

diff --git a/test/lisp/cedet/semantic/bovine/gcc-tests.el b/test/lisp/cedet/semantic/bovine/gcc-tests.el
index 2e61f91e58c..525843d9960 100644
--- a/test/lisp/cedet/semantic/bovine/gcc-tests.el
+++ b/test/lisp/cedet/semantic/bovine/gcc-tests.el
@@ -122,14 +122,9 @@ gcc version 2.95.2 19991024 (release)"
 
 (ert-deftest semantic-gcc-test-output-parser-this-machine ()
   "Test the output parser against the machine currently running Emacs."
-  (skip-unless (executable-find "gcc"))
+  (skip-unless (and (executable-find "gcc")
+                    (not (ert-gcc-is-clang-p))))
   (let ((semantic-gcc-test-strings (list (semantic-gcc-query "gcc" "-v"))))
-    ;; Some macOS machines run llvm when you type gcc.  (!)
-    ;; We can't even check if it's a symlink; it's a binary placed in
-    ;; "/usr/bin/gcc".  So check the output and just skip this test if
-    ;; it looks like that's the case.
-    (unless (string-match "Apple \\(LLVM\\|clang\\)\\|Xcode\\.app"
-                          (car semantic-gcc-test-strings))
-        (semantic-gcc-test-output-parser))))
+    (semantic-gcc-test-output-parser)))
 
 ;;; gcc-tests.el ends here