[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Delayed warnings
From: |
Juanma Barranquero |
Subject: |
Re: Delayed warnings |
Date: |
Thu, 28 Apr 2011 00:11:41 +0200 |
On Wed, Apr 27, 2011 at 19:32, Stefan Monnier <address@hidden> wrote:
> You might want to add some code to avoid/detect repetitions.
(delete-dups '(A A B A B B C B C C D)) => A B C D
or
(uniqify '(A A B A B B C B C C D)) => A B A B C B C D
?
Juanma
P.S.: Assuming
(defun uniqify (list)
"Destructively remove consecutive `equal' duplicates from LIST.
Store the result in LIST and return it. LIST must be a proper list."
(let ((l list))
(while (cdr l)
(if (equal (car l) (cadr l))
(setcdr l (cddr l))
(setq l (cdr l))))
list))
which should be in subr.el, because its functionality is duplicated in
quite a few .el files.
- Re: Delayed warnings, Juanma Barranquero, 2011/04/26
- Re: Delayed warnings, Eli Zaretskii, 2011/04/26
- Re: Delayed warnings, Stefan Monnier, 2011/04/27
- Re: Delayed warnings,
Juanma Barranquero <=
- Re: Delayed warnings, Stefan Monnier, 2011/04/27
- Re: Delayed warnings, Juanma Barranquero, 2011/04/27
- Re: Delayed warnings, Stefan Monnier, 2011/04/28
- Re: Delayed warnings, Juanma Barranquero, 2011/04/28
- Re: Delayed warnings, Stefan Monnier, 2011/04/28