diff options
author | João Távora <joaotavora@gmail.com> | 2020-09-21 15:52:49 +0100 |
---|---|---|
committer | João Távora <joaotavora@gmail.com> | 2020-09-21 17:01:08 +0100 |
commit | ea9544dac5ceb27451d1b7142a785410cf811925 (patch) | |
tree | ac6802dabc5396c09a417e07071eabb80672b32b /test/lisp/progmodes/elisp-mode-tests.el | |
parent | 8aa2276a5ae97156a8ecfb0e32e86f1224cf1a23 (diff) | |
download | emacs-ea9544dac5ceb27451d1b7142a785410cf811925.tar.gz |
Shoosh byte-compiler in test/lisp/progmodes/elisp-mode-tests
* test/lisp/progmodes/elisp-mode-tests.el (xref-elisp-generic-no-default)
(xref-elisp-generic-co-located-default)
(xref-elisp-generic-separate-default): Prefix local arguments with _.
Diffstat (limited to 'test/lisp/progmodes/elisp-mode-tests.el')
-rw-r--r-- | test/lisp/progmodes/elisp-mode-tests.el | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/test/lisp/progmodes/elisp-mode-tests.el b/test/lisp/progmodes/elisp-mode-tests.el index d15fae447aa..dee043bd3ec 100644 --- a/test/lisp/progmodes/elisp-mode-tests.el +++ b/test/lisp/progmodes/elisp-mode-tests.el @@ -424,7 +424,7 @@ to (xref-elisp-test-descr-to-target xref)." ;; causes the batch mode test to fail; the symbol shows up as ;; ‘this’. It passes in interactive tests, so I haven't been able to ;; track down the problem. -(cl-defmethod xref-elisp-generic-no-default ((this xref-elisp-root-type) arg2) +(cl-defmethod xref-elisp-generic-no-default ((_this xref-elisp-root-type) _arg2) "doc string generic no-default xref-elisp-root-type" "non-default for no-default") @@ -436,11 +436,11 @@ to (xref-elisp-test-descr-to-target xref)." ;; dispatching code. ) -(cl-defgeneric xref-elisp-generic-co-located-default (arg1 arg2) +(cl-defgeneric xref-elisp-generic-co-located-default (_arg1 _arg2) "doc string generic co-located-default" "co-located default") -(cl-defmethod xref-elisp-generic-co-located-default ((this xref-elisp-root-type) arg2) +(cl-defmethod xref-elisp-generic-co-located-default ((_this xref-elisp-root-type) _arg2) "doc string generic co-located-default xref-elisp-root-type" "non-default for co-located-default") @@ -449,19 +449,19 @@ to (xref-elisp-test-descr-to-target xref)." ;; default implementation provided separately ) -(cl-defmethod xref-elisp-generic-separate-default (arg1 arg2) +(cl-defmethod xref-elisp-generic-separate-default (_arg1 _arg2) "doc string generic separate-default default" "separate default") -(cl-defmethod xref-elisp-generic-separate-default ((this xref-elisp-root-type) arg2) +(cl-defmethod xref-elisp-generic-separate-default ((_this xref-elisp-root-type) _arg2) "doc string generic separate-default xref-elisp-root-type" "non-default for separate-default") -(cl-defmethod xref-elisp-generic-implicit-generic (arg1 arg2) +(cl-defmethod xref-elisp-generic-implicit-generic (_arg1 _arg2) "doc string generic implicit-generic default" "default for implicit generic") -(cl-defmethod xref-elisp-generic-implicit-generic ((this xref-elisp-root-type) arg2) +(cl-defmethod xref-elisp-generic-implicit-generic ((_this xref-elisp-root-type) _arg2) "doc string generic implicit-generic xref-elisp-root-type" "non-default for implicit generic") |