From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED.blaine.gmane.org!not-for-mail From: Stefan Monnier Newsgroups: gmane.emacs.devel Subject: Re: gv-exander for 'list' Date: Wed, 20 Mar 2019 15:06:28 -0400 Message-ID: References: <87bm26stsj.fsf@web.de> <87sgviqys2.fsf@web.de> <87ef71s97s.fsf@web.de> Mime-Version: 1.0 Content-Type: text/plain Injection-Info: blaine.gmane.org; posting-host="blaine.gmane.org:195.159.176.226"; logging-data="211573"; mail-complaints-to="usenet@blaine.gmane.org" User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/27.0.50 (gnu/linux) Cc: emacs-devel@gnu.org To: Michael Heerdegen Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Wed Mar 20 20:06:57 2019 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([209.51.188.17]) by blaine.gmane.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:256) (Exim 4.89) (envelope-from ) id 1h6gYC-000syD-SQ for ged-emacs-devel@m.gmane.org; Wed, 20 Mar 2019 20:06:57 +0100 Original-Received: from localhost ([127.0.0.1]:52003 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1h6gYB-0005hW-TK for ged-emacs-devel@m.gmane.org; Wed, 20 Mar 2019 15:06:55 -0400 Original-Received: from eggs.gnu.org ([209.51.188.92]:60209) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1h6gY6-0005hJ-R3 for emacs-devel@gnu.org; Wed, 20 Mar 2019 15:06:51 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1h6gY4-0006Zz-Jz for emacs-devel@gnu.org; Wed, 20 Mar 2019 15:06:49 -0400 Original-Received: from mail01.iro.umontreal.ca ([132.204.25.201]:44192) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1h6gY1-0005nP-5G for emacs-devel@gnu.org; Wed, 20 Mar 2019 15:06:46 -0400 Original-Received: from mail01.iro.umontreal.ca (mail01.iro.umontreal.ca [127.0.0.1]) by mail01.iro.umontreal.ca (Postfix) with ESMTP id B6A2980EFB27 for ; Wed, 20 Mar 2019 15:06:30 -0400 (EDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=iro.umontreal.ca; h=content-type:content-type:mime-version:user-agent:in-reply-to :date:date:references:message-id:subject:subject:to:from:from; s=dkim; t=1553108790; x=1553972791; bh=a3IzBd6xtKQOv9DE9gYuK21D ai19Hhae5V8yxnXRhzs=; b=dibvyVc/8GlDBQIL/63Ug5MNekoFlKeVEWN1Vty8 jC7uBWVrQ/9Ne+49R1irNjpcgDxcXm0lrdBVlWEg3b6lVtUL+7u9wjljWcBGTm0P shJdiKuO/gwl4UcT7MUuUWZKEHbjNQaAST9HDOPRdxESSWPXihbHrQun8USK38qa 6KOq05zfIOFOxliaF5fZGXdFsYBCBV7Z8gAp8R2U5O91YghwkBbNKNeZx/lGRtnd /RFgSc8zgciqUPFqXj8nIQzXZdY044KWoag7kXExPmc0CbLbiwmLK2Y1RTuez1WC aiNwwt1q4N8kLzF3mvwsLtQMsZYoCCnrW+yDNSLKhdOJmg== X-Virus-Scanned: amavisd-new at iro.umontreal.ca Original-Received: from mail01.iro.umontreal.ca ([127.0.0.1]) by mail01.iro.umontreal.ca (mail01.iro.umontreal.ca [127.0.0.1]) (amavisd-new, port 10024) with ESMTP id 4KdOThajr9y7 for ; Wed, 20 Mar 2019 15:06:30 -0400 (EDT) Original-Received: from pastel (75-119-242-252.dsl.teksavvy.com [75.119.242.252]) by mail01.iro.umontreal.ca (Postfix) with ESMTPSA id EC77D80EFB10; Wed, 20 Mar 2019 15:06:29 -0400 (EDT) In-Reply-To: <87ef71s97s.fsf@web.de> (Michael Heerdegen's message of "Wed, 20 Mar 2019 19:15:51 +0100") X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 132.204.25.201 X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.21 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Original-Sender: "Emacs-devel" Xref: news.gmane.org gmane.emacs.devel:234417 Archived-At: >> + (funcall do `(list ,@(mapcar #'car getters+setters)) >> + (lambda (v) >> + (macroexp-let2 macroexp-copyable-p v v >> + (macroexp-progn >> + (mapcar (lambda (x) (funcall (cdr x) `(pop ,v))) >> + getters+setters)))))))) > is there a trick to avoid the redundant macroexp-progn in such a > situation? macroexp-let2 only accept a body as &rest, but since it's a > macro I can't `apply' it. The redundant `progn` should be removed by `macroexp-let2`, but otherwise I can't see how you could avoid the `progn` while still using `macroexp-let2`. Stefan