1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-21 12:03:55 -08:00

* Disable ipa-pure in comp-tests-tco

* test/src/comp-tests.el (comp-tests-tco): Disable ipa-pure to
	check effectively for tail recursion elimination.
This commit is contained in:
Andrea Corallo 2020-07-08 20:57:20 +01:00
parent 9aaca828fc
commit 02bf2e08e2

View file

@ -629,6 +629,9 @@ CHECKER should always return nil to have a pass."
(ert-deftest comp-tests-tco ()
"Check for tail recursion elimination."
(let ((comp-speed 3)
;; Disable ipa-pure otherwise `comp-tests-tco-f' gets
;; optimized-out.
(comp-disabled-passes '(comp-ipa-pure))
(comp-post-pass-hooks '((comp-tco comp-tests-tco-checker)
(comp-final comp-tests-tco-checker))))
(eval '(defun comp-tests-tco-f (a b count)