diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2021-12-20 20:45:39 -0500 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2021-12-20 20:45:39 -0500 |
| commit | bfcff4619982f9bf8c9b4a656aae454968b83db5 (patch) | |
| tree | c6fd33f5637cb45ec2be3c018c9443d3212cd52a | |
| parent | 4234995d428f53ffa9dbf2d4817e2cdfe613a5f4 (diff) | |
| download | emacs-bfcff4619982f9bf8c9b4a656aae454968b83db5.tar.gz | |
eieio-tests.el: Silence last warnings
* test/lisp/emacs-lisp/eieio-tests/eieio-tests.el (eieio-tests--dummy):
New class.
(eieio-test-22-init-forms-dont-match-runnable): Tweak to silence warning.
| -rw-r--r-- | test/lisp/emacs-lisp/eieio-tests/eieio-tests.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/test/lisp/emacs-lisp/eieio-tests/eieio-tests.el b/test/lisp/emacs-lisp/eieio-tests/eieio-tests.el index c13d3ee6efa..3ed00f49d14 100644 --- a/test/lisp/emacs-lisp/eieio-tests/eieio-tests.el +++ b/test/lisp/emacs-lisp/eieio-tests/eieio-tests.el @@ -55,6 +55,9 @@ ) "Class A.") +;; Silence compiler warning about `water' not being a class-allocated slot. +(defclass eieio-tests--dummy () ((water :allocation :class))) + (defclass class-b () ((land :initform "Sc" :type string @@ -555,7 +558,7 @@ METHOD is the method that was attempting to be called." "Test class that will be a calculated value.") (defclass eitest-superior nil - ((sub :initform (eitest-subordinate) + ((sub :initform (funcall #'eitest-subordinate) :type eitest-subordinate)) "A class with an initform that creates a class.") |