[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

bug#28254: 26.0.50; SRFI-2 and-let*

From: Mark Oteiza
Subject: bug#28254: 26.0.50; SRFI-2 and-let*
Date: Wed, 6 Sep 2017 09:06:40 -0400
User-agent: Mutt/1.9.0 (2017-09-02)

On 06/09/17 at 02:12pm, Michael Heerdegen wrote:
Hi Mark,

I just had a quick look.  One detail:

+  (cond
+   ((null elt) (list elt))
+   ((symbolp elt) (list elt elt))
+   ((nlistp elt) (list elt))
+   ((and (null (cdr elt))
+         (atom (car elt)))
+    (list (cl-gensym) (car elt)))
+   ((and (null (cdr elt))
+         (let ((form (car elt)))
+           (or (listp form) (atom form))))
+    (list (cl-gensym) (car elt)))

Wouldn't this mean we would have to (require 'cl-lib) (without
`eval-when-compile') in subr-x?  I'm not sure if that would be

Ah, yes.  That will just have to change to (make-symbol "x") or similar.
(It made debugging a lot easier)

reply via email to

[Prev in Thread] Current Thread [Next in Thread]