aboutsummaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
authorKen Brown2023-03-25 16:37:51 -0400
committerKen Brown2023-03-26 10:04:59 -0400
commit45b16bfb496025d9f21f7cdccb6a25a0be83a26f (patch)
tree2d9c24761e176d16fab3dfcd16b60918aebe04a7 /test
parent8b4a494d8d4413ae6d566f6478f84e319aeaacdd (diff)
downloademacs-45b16bfb496025d9f21f7cdccb6a25a0be83a26f.tar.gz
emacs-45b16bfb496025d9f21f7cdccb6a25a0be83a26f.zip
Skip failing tests on Cygwin with native compilation (bug#62450)
* test/Makefile.in (TEST_NATIVE_COMP): New variable, used to determine whether to run tests tagged with :nativecomp. Set it to "no" on Cygwin and to $(HAVE_NATIVE_COMP) otherwise. * test/lisp/emacs-lisp/benchmark-tests.el (benchmark-tests): Skip on Cygwin with native-compilation.
Diffstat (limited to 'test')
-rw-r--r--test/Makefile.in9
-rw-r--r--test/lisp/emacs-lisp/benchmark-tests.el4
2 files changed, 12 insertions, 1 deletions
diff --git a/test/Makefile.in b/test/Makefile.in
index fd21695f5bc..e8edf7739b7 100644
--- a/test/Makefile.in
+++ b/test/Makefile.in
@@ -124,7 +124,14 @@ test_module_dir := src/emacs-module-resources
124 124
125all: check 125all: check
126 126
127ifeq ($(HAVE_NATIVE_COMP),yes) 127SYSTEM_TYPE = @SYSTEM_TYPE@
128TEST_NATIVE_COMP = $(HAVE_NATIVE_COMP)
129# Avoid fork failures on Cygwin. See bug#62450 and etc/PROBLEMS
130# ("Fork failures in a build with native compilation").
131ifeq ($(SYSTEM_TYPE),cygwin)
132TEST_NATIVE_COMP = no
133endif
134ifeq ($(TEST_NATIVE_COMP),yes)
128SELECTOR_DEFAULT = (not (or (tag :expensive-test) (tag :unstable))) 135SELECTOR_DEFAULT = (not (or (tag :expensive-test) (tag :unstable)))
129SELECTOR_EXPENSIVE = (not (tag :unstable)) 136SELECTOR_EXPENSIVE = (not (tag :unstable))
130SELECTOR_ALL = t 137SELECTOR_ALL = t
diff --git a/test/lisp/emacs-lisp/benchmark-tests.el b/test/lisp/emacs-lisp/benchmark-tests.el
index 31357f24a0d..99b5b142c37 100644
--- a/test/lisp/emacs-lisp/benchmark-tests.el
+++ b/test/lisp/emacs-lisp/benchmark-tests.el
@@ -23,6 +23,10 @@
23(require 'ert) 23(require 'ert)
24 24
25(ert-deftest benchmark-tests () 25(ert-deftest benchmark-tests ()
26 ;; Avoid fork failures on Cygwin. See bug#62450 and etc/PROBLEMS
27 ;; ("Fork failures in a build with native compilation").
28 (skip-unless (not (and (eq system-type 'cygwin)
29 (featurep 'native-compile))))
26 (let (str t-long t-short m) 30 (let (str t-long t-short m)
27 (should (consp (benchmark-run nil (setq m (1+ 0))))) 31 (should (consp (benchmark-run nil (setq m (1+ 0)))))
28 (should (consp (benchmark-run 1 (setq m (1+ 0))))) 32 (should (consp (benchmark-run 1 (setq m (1+ 0)))))