unofficial mirror of bug-gnu-emacs@gnu.org 
 help / color / mirror / code / Atom feed
* bug#50704: Feature request: Add ensure-list in cl-lib
@ 2021-09-20 19:43 Clément Pit-Claudel
  2021-09-20 21:05 ` Lars Ingebrigtsen
  0 siblings, 1 reply; 5+ messages in thread
From: Clément Pit-Claudel @ 2021-09-20 19:43 UTC (permalink / raw)
  To: 50704

Hi all,

There are 40+ instances of the following code pattern in Emacs' code base, and many more in packages:

   (if (listp x) x (list x))

It's easy to find single-line instances of it using the regexp [(]if [(]listp .*[(]list .

This pattern is called "ensure-list" in CL:

  (defun ensure-list (thing)
    "Returns THING as a list.

  If THING is already a list (as per listp) it is returned,
  otherwise a one element list containing THING is returned."
    (if (listp thing)
        thing
        (list thing)))

I would like to add a similar function in Emacs, since it comes up so often.  Is that an acceptable change?  

If so:
- Which cl-*.el file should it go into, and where in that file?  
- Should it be a defun or a define-inline?  
- And once it is introduced, should the 40-some instances that could use it be updated, or left as-is?  
- Finally, where should it be documented?

Cheers,
Clément.





^ permalink raw reply	[flat|nested] 5+ messages in thread

end of thread, other threads:[~2021-09-21 18:43 UTC | newest]

Thread overview: 5+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2021-09-20 19:43 bug#50704: Feature request: Add ensure-list in cl-lib Clément Pit-Claudel
2021-09-20 21:05 ` Lars Ingebrigtsen
2021-09-21 15:29   ` Stefan Kangas
2021-09-21 18:31     ` Lars Ingebrigtsen
2021-09-21 18:43       ` Clément Pit-Claudel

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).