From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED!not-for-mail From: Mark Oteiza Newsgroups: gmane.emacs.bugs Subject: bug#28254: 26.0.50; SRFI-2 and-let* Date: Wed, 6 Sep 2017 09:06:40 -0400 Message-ID: <20170906130640.GA1063@holos.localdomain> References: <20170902021043.GA7509@holos.localdomain> <878thx7qcc.fsf@users.sourceforge.net> <20170902041424.GA21189@holos.localdomain> <87tw0lzn7w.fsf@drachen> <20170902133604.GA27251@holos.localdomain> <87vakzwu5e.fsf@drachen> <20170903223959.GA15782@holos.localdomain> <20170905034744.GA11331@holos.localdomain> <87vakwhvpb.fsf@drachen> NNTP-Posting-Host: blaine.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii; format=flowed X-Trace: blaine.gmane.org 1504703256 924 195.159.176.226 (6 Sep 2017 13:07:36 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Wed, 6 Sep 2017 13:07:36 +0000 (UTC) User-Agent: Mutt/1.9.0 (2017-09-02) Cc: 28254@debbugs.gnu.org, Noam Postavsky To: Michael Heerdegen Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Wed Sep 06 15:07:25 2017 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by blaine.gmane.org with esmtp (Exim 4.84_2) (envelope-from ) id 1dpa33-0007vG-Qo for geb-bug-gnu-emacs@m.gmane.org; Wed, 06 Sep 2017 15:07:17 +0200 Original-Received: from localhost ([::1]:36114 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dpa39-0001p8-9g for geb-bug-gnu-emacs@m.gmane.org; Wed, 06 Sep 2017 09:07:23 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:33081) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dpa2u-0001oP-Fb for bug-gnu-emacs@gnu.org; Wed, 06 Sep 2017 09:07:18 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1dpa2o-0005SI-NM for bug-gnu-emacs@gnu.org; Wed, 06 Sep 2017 09:07:08 -0400 Original-Received: from debbugs.gnu.org ([208.118.235.43]:43784) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1dpa2o-0005SA-HI for bug-gnu-emacs@gnu.org; Wed, 06 Sep 2017 09:07:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1dpa2o-0005gO-AN for bug-gnu-emacs@gnu.org; Wed, 06 Sep 2017 09:07:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Mark Oteiza Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Wed, 06 Sep 2017 13:07:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 28254 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: Original-Received: via spool by 28254-submit@debbugs.gnu.org id=B28254.150470321021826 (code B ref 28254); Wed, 06 Sep 2017 13:07:02 +0000 Original-Received: (at 28254) by debbugs.gnu.org; 6 Sep 2017 13:06:50 +0000 Original-Received: from localhost ([127.0.0.1]:52465 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1dpa2b-0005fy-O4 for submit@debbugs.gnu.org; Wed, 06 Sep 2017 09:06:49 -0400 Original-Received: from mail-qt0-f181.google.com ([209.85.216.181]:36962) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1dpa2a-0005fl-CG for 28254@debbugs.gnu.org; Wed, 06 Sep 2017 09:06:48 -0400 Original-Received: by mail-qt0-f181.google.com with SMTP id h15so19458924qta.4 for <28254@debbugs.gnu.org>; Wed, 06 Sep 2017 06:06:48 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=udel-edu.20150623.gappssmtp.com; s=20150623; h=date:from:to:cc:subject:message-id:references:mime-version :content-disposition:in-reply-to:user-agent; bh=+iCZniTDgTXbUrUcK5Stm7if13YKrBkpQyqYv6LoHV8=; b=SyFZ51a6cVZ4Ckmg5i41htFCrT7sxspeP9oloxFxNz+P+Nnz3UMFYltvLMEYd77Oty lxvm25d2Yp6sNVoYtRJ7K6cWqGEC/NyQHPDRt0e02jtN38OwiOD/ShJMxeUzZ9bpKTGa /PCCf+zhF3zKF6Sw1slRk8gQqX99OwkpKCZG7vlKVhMrqNzfliu7lVaqwXJqGWxDkkCv dIMdRXxXz1MalKQG9IO2OolDviHQ1rUPZ6YPpEg5z34qnRr+a29+j+zVRTSp8bUujxI/ O1JY8dltOf9TEIfuYLgzYMDd8q2m8Is8iXY9aNzqE5QX1a17ab1S693u9MTmBtvLd6wQ 4cCA== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:date:from:to:cc:subject:message-id:references :mime-version:content-disposition:in-reply-to:user-agent; bh=+iCZniTDgTXbUrUcK5Stm7if13YKrBkpQyqYv6LoHV8=; b=oktxhC74fqJoDwP8FNqH+cQSOAnt995rcEYVrRQ2/+bvAkV3x8UZfbmWf9M1NXreZO +pzUZX2zcPaaHUKHxZZBYnO06txrNCRSGMsBMW9ebTdDOhXFw28iUfHMpZ/4d5PJIwgq SJGCuRZZWcPGgA22cS29lckksoeKI9+WXHWd7vBLQaV5W/pjB0vgJZVXFUczeVwjaiXF 79pnWtANe/fg5ryj2g+SBWbuMNBWaGWOeXEqAVg9PpT5SlN80LB9Z54/nIAlGHlQub8d jXSkFAV45QzTBkzlnnNARNbc7abY4Fel2l3fvLB/XlQjVkwCZtMBYn2Ax8EanBPh43au sKKw== X-Gm-Message-State: AHPjjUiA0hp+fZQ2Dq8Et2Evsx+XJQiq0/o6+m6YBn2/QTsK8rlRacky VjoWuFj7vCEIslJHOEOIHw== X-Google-Smtp-Source: ADKCNb4VimuoDI5VE94hf1HLPMumHjeD4uvbP9zo+YX5heqy3bfq74vloCF2p/RZzW+4kRb3/KEMMQ== X-Received: by 10.200.58.165 with SMTP id x34mr3270382qte.261.1504703202403; Wed, 06 Sep 2017 06:06:42 -0700 (PDT) Original-Received: from holos.localdomain (pool-173-67-36-61.bltmmd.fios.verizon.net. [173.67.36.61]) by smtp.gmail.com with ESMTPSA id x124sm2248559qka.85.2017.09.06.06.06.40 (version=TLS1_2 cipher=ECDHE-RSA-CHACHA20-POLY1305 bits=256/256); Wed, 06 Sep 2017 06:06:41 -0700 (PDT) Original-Received: by holos.localdomain (Postfix, from userid 1000) id 5CFAA68E62; Wed, 6 Sep 2017 09:06:40 -0400 (EDT) Content-Disposition: inline In-Reply-To: <87vakwhvpb.fsf@drachen> X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 208.118.235.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: "bug-gnu-emacs" Xref: news.gmane.org gmane.emacs.bugs:136635 Archived-At: 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)