[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master bfcff46: eieio-tests.el: Silence last warnings
From: |
Stefan Monnier |
Subject: |
master bfcff46: eieio-tests.el: Silence last warnings |
Date: |
Mon, 20 Dec 2021 20:45:46 -0500 (EST) |
branch: master
commit bfcff4619982f9bf8c9b4a656aae454968b83db5
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
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.
---
test/lisp/emacs-lisp/eieio-tests/eieio-tests.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/test/lisp/emacs-lisp/eieio-tests/eieio-tests.el
b/test/lisp/emacs-lisp/eieio-tests/eieio-tests.el
index c13d3ee..3ed00f4 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.")
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master bfcff46: eieio-tests.el: Silence last warnings,
Stefan Monnier <=