aboutsummaryrefslogtreecommitdiff
path: root/compat-31.el
diff options
context:
space:
mode:
Diffstat (limited to 'compat-31.el')
-rw-r--r--compat-31.el6
1 files changed, 6 insertions, 0 deletions
diff --git a/compat-31.el b/compat-31.el
index b6aa5e3..e27ef0f 100644
--- a/compat-31.el
+++ b/compat-31.el
@@ -29,6 +29,12 @@
;;;; Defined in subr.el
+(compat-defun hash-table-contains-p (key table) ;; <compat-tests:hash-table-contains-p>
+ "Return non-nil if TABLE has an element with KEY."
+ (declare (side-effect-free t))
+ (let ((missing '#:missing))
+ (not (eq (gethash key table missing) missing))))
+
(compat-defmacro static-when (condition &rest body) ;; <compat-tests:static-when>
"A conditional compilation macro.
Evaluate CONDITION at macro-expansion time. If it is non-nil,