procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* Better identify native compiler presence in two tests.

Browse source 
* test/lisp/help-fns-tests.el (help-fns-test-lisp-defun)
	(help-fns-test-lisp-defsubst): Better identify native-comp
	presence.
This commit is contained in:
Andrea Corallo 2021-05-05 17:00:59 +02:00
parent a9f4ee3d3d
commit 3481903d13
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
test/lisp/help-fns-tests.el
View file

@ -62,14 +62,14 @@ Return first line of the output of (describe-function-1 FUNC)."
(should (string-match regexp result))))
(ert-deftest help-fns-test-lisp-defun ()
(let ((regexp (if (boundp 'comp-ctxt)
(let ((regexp (if (featurep 'nativecomp)
"a native compiled Lisp function in .+subr\\.el"
"a compiled Lisp function in .+subr\\.el"))
(result (help-fns-tests--describe-function 'last)))
(should (string-match regexp result))))
(ert-deftest help-fns-test-lisp-defsubst ()
(let ((regexp (if (boundp 'comp-ctxt)
(let ((regexp (if (featurep 'nativecomp)
"a native compiled Lisp function in .+subr\\.el"
"a compiled Lisp function in .+subr\\.el"))
(result (help-fns-tests--describe-function 'posn-window)))