diff options
| author | Glenn Morris | 2018-12-20 07:51:17 -0800 |
|---|---|---|
| committer | Glenn Morris | 2018-12-20 07:51:17 -0800 |
| commit | 62112a77f191c0b00aa420ce2d0fee8aa03592bf (patch) | |
| tree | 3f6f65f84d5f4a600534ae29aec1ef49fa797c4f /test | |
| parent | 1e5f84805884e37563db9f16076d458ceaa03917 (diff) | |
| parent | 081fb694c3f88e77d4a0e09fba8ce457037b9132 (diff) | |
| download | emacs-62112a77f191c0b00aa420ce2d0fee8aa03592bf.tar.gz emacs-62112a77f191c0b00aa420ce2d0fee8aa03592bf.zip | |
Merge from origin/emacs-26
081fb69 (origin/emacs-26) Check result from c-backward-token-2 to avo...
f4ea746 cl-make-random-state was not copying its arg
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/emacs-lisp/cl-extra-tests.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/test/lisp/emacs-lisp/cl-extra-tests.el b/test/lisp/emacs-lisp/cl-extra-tests.el index baad8eb8e67..fe59703530f 100644 --- a/test/lisp/emacs-lisp/cl-extra-tests.el +++ b/test/lisp/emacs-lisp/cl-extra-tests.el | |||
| @@ -94,4 +94,9 @@ | |||
| 94 | (should (equal (list lst3 (cdr lst3) (cddr lst3)) | 94 | (should (equal (list lst3 (cdr lst3) (cddr lst3)) |
| 95 | (cl-maplist fn3 lst lst2 lst3))))) | 95 | (cl-maplist fn3 lst lst2 lst3))))) |
| 96 | 96 | ||
| 97 | (ert-deftest cl-extra-test-cl-make-random-state () | ||
| 98 | (let ((s (cl-make-random-state))) | ||
| 99 | ;; Test for Bug#33731. | ||
| 100 | (should-not (eq s (cl-make-random-state s))))) | ||
| 101 | |||
| 97 | ;;; cl-extra-tests.el ends here | 102 | ;;; cl-extra-tests.el ends here |