Add new inline function `hash-table-empty-p'
This commit is contained in:
parent
e2f5b72f78
commit
7a22bb66a6
1 changed files with 4 additions and 0 deletions
|
@ -140,6 +140,10 @@ to bind a single value, BINDINGS can just be a plain tuple."
|
|||
(declare (indent 1) (debug if-let))
|
||||
(list 'if-let bindings (macroexp-progn body)))
|
||||
|
||||
(defsubst hash-table-empty-p (table)
|
||||
"Check whether TABLE is empty (has 0 elements)."
|
||||
(zerop (hash-table-count table)))
|
||||
|
||||
(defsubst hash-table-keys (hash-table)
|
||||
"Return a list of keys in HASH-TABLE."
|
||||
(let ((keys '()))
|
||||
|
|
Loading…
Add table
Reference in a new issue