mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-02 11:21:42 +00:00
Code Issues Releases Activity

* test/src/lread-tests.el (lread-test-bug-31186): New test.

Browse Source
This commit is contained in:
Eli Zaretskii 2018-04-17 18:40:41 +03:00
parent 3fa472b487
commit a539eb51ac
1 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
test/src/lread-tests.el
View File

@ -170,4 +170,12 @@ literals (Bug#20852)."
(lread--substitute-object-in-subtree x 1 t)
(should (eq x (cdr x)))))
(ert-deftest lread-test-bug-31186 ()
(with-temp-buffer
(insert ";; -*- -:*-")
(should-not
;; This used to crash in lisp_file_lexically_bound_p before the
;; bug was fixed.
(eval-buffer))))
;;; lread-tests.el ends here