diff options
| author | Glenn Morris <rgm@gnu.org> | 2017-05-31 21:17:28 -0400 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2017-05-31 21:17:28 -0400 |
| commit | afcbec61147fe84504de0d329ce40031fa79075b (patch) | |
| tree | 6fde89be57d8c561ddee890aee0fa42bd68e134b /test/src/data-tests.el | |
| parent | 6aacd4fb09517b0dedf62333f0e27b28e8732f63 (diff) | |
| download | emacs-afcbec61147fe84504de0d329ce40031fa79075b.tar.gz emacs-afcbec61147fe84504de0d329ce40031fa79075b.tar.bz2 emacs-afcbec61147fe84504de0d329ce40031fa79075b.zip | |
Quieten compilation of some test files
* test/lisp/dired-tests.el (dired-test-bug25609): Mark unused args.
* test/src/data-tests.el (binding-test-set-constant-t)
(binding-test-set-constant-nil, binding-test-set-constant-keyword)
(binding-test-set-constant-nil): Silence compiler.
* test/src/regex-tests.el (regex-tests-BOOST): Escape char literal.
Diffstat (limited to 'test/src/data-tests.el')
| -rw-r--r-- | test/src/data-tests.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/test/src/data-tests.el b/test/src/data-tests.el index 8caafc11c2f..00a30559e32 100644 --- a/test/src/data-tests.el +++ b/test/src/data-tests.el @@ -338,19 +338,19 @@ comparing the subr with a much slower lisp implementation." (ert-deftest binding-test-set-constant-t () "Test setting the constant t" - (should-error (setq t 'bob) :type 'setting-constant)) + (with-no-warnings (should-error (setq t 'bob) :type 'setting-constant))) (ert-deftest binding-test-set-constant-nil () "Test setting the constant nil" - (should-error (setq nil 'bob) :type 'setting-constant)) + (with-no-warnings (should-error (setq nil 'bob) :type 'setting-constant))) (ert-deftest binding-test-set-constant-keyword () "Test setting a keyword constant" - (should-error (setq :keyword 'bob) :type 'setting-constant)) + (with-no-warnings (should-error (setq :keyword 'bob) :type 'setting-constant))) (ert-deftest binding-test-set-constant-nil () "Test setting a keyword to itself" - (should (setq :keyword :keyword))) + (with-no-warnings (should (setq :keyword :keyword)))) ;; More tests to write - ;; kill-local-variable |