mdebray/tvl-depot
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

chore(wpcarro/emacs): Move list-wrap out of predicates section

Browse source 
Formatting issue.

Change-Id: Ia5fe86572600a388beaf5e96b6dafd52ff223efb
Reviewed-on: https://cl.tvl.fyi/c/depot/+/6044
Reviewed-by: wpcarro <wpcarro@gmail.com>
Autosubmit: wpcarro <wpcarro@gmail.com>
Tested-by: BuildkiteCI
This commit is contained in:
William Carroll 2022-08-05 13:34:18 -07:00 committed by clbot
parent cc802eb44b
commit 9203531abe
1 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
users/wpcarro/emacs/pkgs/list/list.el
View file

@ -163,6 +163,12 @@ Returns a new list without X. If X occurs more than once, only the first
(result (plist-get xs :result)))
(list-reverse (if curr (list-cons curr result) result)))))
(defun list-wrap (xs)
"Wraps XS in a list if it is not a list already."
(if (list-instance? xs)
xs
(list xs)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Predicates
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@ -201,12 +207,6 @@ Be leery of using this with things like alists. Many data structures in Elisp
(= (length xs)
(set-count (set-from-list (list-map f xs)))))
(defun list-wrap (xs)
"Wraps XS in a list if it is not a list already."
(if (list-instance? xs)
xs
(list xs)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Helpers
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;