* lisp/emacs-lisp/pcase.el (pcase-mutually-exclusive-predicates): Add `null`

diff --git a/lisp/emacs-lisp/pcase.el b/lisp/emacs-lisp/pcase.el
index 1c5ce5169ab998d449d2f09662bbb3f6a06e0a26..d5f7249e52791f9a7cb612839b3c84e90b84b076 100644 (file)
--- a/lisp/emacs-lisp/pcase.el
+++ b/lisp/emacs-lisp/pcase.el
@@ -609,6 +609,16 @@ recording whether the var has been referenced by earlier parts of the match."
     (symbolp . byte-code-function-p)
     (symbolp . compiled-function-p)
     (symbolp . recordp)
+    (null . integerp)
+    (null . numberp)
+    (null . numberp)
+    (null . consp)
+    (null . arrayp)
+    (null . vectorp)
+    (null . stringp)
+    (null . byte-code-function-p)
+    (null . compiled-function-p)
+    (null . recordp)
     (integerp . consp)
     (integerp . arrayp)
     (integerp . vectorp)