diff options
author | Yuuki Harano <masm+github@masm11.me> | 2021-03-14 23:24:49 +0900 |
---|---|---|
committer | Yuuki Harano <masm+github@masm11.me> | 2021-03-14 23:24:49 +0900 |
commit | 7a7bc15242896b20c7af49f77f0e22c3d78e4d88 (patch) | |
tree | 1931644be0ecdfe850975a98d8a665ea1734e49b /test/lisp/emacs-lisp/bytecomp-tests.el | |
parent | 56297c0f426314dde66614a5c4e459c285af939a (diff) | |
parent | f9b737fb9d21ac7adff403274167e76e77d033b8 (diff) | |
download | emacs-7a7bc15242896b20c7af49f77f0e22c3d78e4d88.tar.gz emacs-7a7bc15242896b20c7af49f77f0e22c3d78e4d88.tar.bz2 emacs-7a7bc15242896b20c7af49f77f0e22c3d78e4d88.zip |
Merge branch 'master' of git.sv.gnu.org:/srv/git/emacs into feature/pgtk
Diffstat (limited to 'test/lisp/emacs-lisp/bytecomp-tests.el')
-rw-r--r-- | test/lisp/emacs-lisp/bytecomp-tests.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/test/lisp/emacs-lisp/bytecomp-tests.el b/test/lisp/emacs-lisp/bytecomp-tests.el index 03c267ccd0f..5147cd26883 100644 --- a/test/lisp/emacs-lisp/bytecomp-tests.el +++ b/test/lisp/emacs-lisp/bytecomp-tests.el @@ -1222,6 +1222,11 @@ compiled correctly." (byte-compile 'counter) (should (equal (counter) 1)))))) +(ert-deftest bytecomp-string-vs-docstring () + ;; Don't confuse a string return value for a docstring. + (let ((lexical-binding t)) + (should (equal (funcall (byte-compile '(lambda (x) "foo")) 'dummy) "foo")))) + ;; Local Variables: ;; no-byte-compile: t ;; End: |