mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-04 02:51:31 -08:00
Code Issues Projects Releases Wiki Activity

* test/lisp/electric-tests.el: Skip most c-mode tests on hydra.

Browse source
This commit is contained in:
Glenn Morris 2021-08-17 08:53:00 -07:00
parent 54039d721c
commit c609b4c728
1 changed files with 9 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

9
test/lisp/electric-tests.el
View file

@ -587,6 +587,7 @@ baz\"\""
;;; Electric newlines between pairs
;;; TODO: better tests
(ert-deftest electric-pair-open-extra-newline ()
(skip-unless (not (getenv "EMACS_HYDRA_CI")))
(save-electric-modes
(with-temp-buffer
(c-mode)
@ -877,6 +878,8 @@ baz\"\""
(c-brace-newlines (c-point-syntax)))))
(ert-deftest electric-layout-plainer-c-mode-use-c-style ()
;; FIXME hangs since c4d34d2
(skip-unless (not (getenv "EMACS_HYDRA_CI")))
(ert-with-test-buffer ()
(plainer-c-mode)
(electric-layout-local-mode 1)
@ -890,6 +893,7 @@ baz\"\""
(should (equal (buffer-string) "int main ()\n{\n \n}\n"))))
(ert-deftest electric-layout-int-main-kernel-style ()
(skip-unless (not (getenv "EMACS_HYDRA_CI")))
(ert-with-test-buffer ()
(plainer-c-mode)
(electric-layout-local-mode 1)
@ -906,6 +910,7 @@ baz\"\""
(ert-deftest electric-layout-control-reindentation ()
"Same as `emacs-lisp-int-main-kernel-style', but checking
Bug#35254."
(skip-unless (not (getenv "EMACS_HYDRA_CI")))
(ert-with-test-buffer ()
(plainer-c-mode)
(electric-layout-local-mode 1)
@ -924,6 +929,7 @@ Bug#35254."
(should (equal (buffer-string) "int main () {\n\n \n}"))))
(ert-deftest electric-modes-int-main-allman-style ()
(skip-unless (not (getenv "EMACS_HYDRA_CI")))
(ert-with-test-buffer ()
(plainer-c-mode)
(electric-layout-local-mode 1)
@ -938,6 +944,7 @@ Bug#35254."
(should (equal (buffer-string) "int main ()\n{\n \n}"))))
(ert-deftest electric-pair-mode-newline-between-parens ()
(skip-unless (not (getenv "EMACS_HYDRA_CI")))
(ert-with-test-buffer ()
(plainer-c-mode)
(electric-layout-local-mode -1) ;; ensure e-l-m mode is off
@ -949,6 +956,7 @@ Bug#35254."
(should (equal (buffer-string) "int main () {\n \n}"))))
(ert-deftest electric-layout-mode-newline-between-parens-without-e-p-m ()
(skip-unless (not (getenv "EMACS_HYDRA_CI")))
(ert-with-test-buffer ()
(plainer-c-mode)
(electric-layout-local-mode 1)
@ -970,6 +978,7 @@ Bug#35254."
(should (equal (buffer-string) "int main () {\n \n}"))))
(ert-deftest electric-layout-mode-newline-between-parens-without-e-p-m-2 ()
(skip-unless (not (getenv "EMACS_HYDRA_CI")))
(ert-with-test-buffer ()
(plainer-c-mode)
(electric-layout-local-mode 1)