|
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 acceptable.
Ah, yes. That will just have to change to (make-symbol "x") or similar. (It made debugging a lot easier)
[Prev in Thread] | Current Thread | [Next in Thread] |