From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Diego Sevilla Ruiz Newsgroups: gmane.emacs.devel Subject: Error in nested backquoting Date: Mon, 01 Jul 2013 00:45:49 +0200 Message-ID: <51D0B51D.1080003@ditec.um.es> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="------------010301040607060303050702" X-Trace: ger.gmane.org 1372632376 8347 80.91.229.3 (30 Jun 2013 22:46:16 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Sun, 30 Jun 2013 22:46:16 +0000 (UTC) To: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Mon Jul 01 00:46:18 2013 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1UtQNr-0007NN-By for ged-emacs-devel@m.gmane.org; Mon, 01 Jul 2013 00:46:15 +0200 Original-Received: from localhost ([::1]:34299 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UtQNr-0002rn-17 for ged-emacs-devel@m.gmane.org; Sun, 30 Jun 2013 18:46:15 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:55678) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UtQNl-0002qa-AT for emacs-devel@gnu.org; Sun, 30 Jun 2013 18:46:12 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1UtQNf-0000r7-Os for emacs-devel@gnu.org; Sun, 30 Jun 2013 18:46:09 -0400 Original-Received: from xenon11.um.es ([155.54.212.165]:49153) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UtQNf-0000jD-IS for emacs-devel@gnu.org; Sun, 30 Jun 2013 18:46:03 -0400 Original-Received: from localhost (localhost [127.0.0.1]) by xenon11.um.es (Postfix) with ESMTP id 7D74F536C3 for ; Mon, 1 Jul 2013 00:45:51 +0200 (CEST) X-Virus-Scanned: by antispam in UMU at xenon11.um.es Original-Received: from xenon11.um.es ([127.0.0.1]) by localhost (xenon11.um.es [127.0.0.1]) (amavisd-new, port 10024) with LMTP id dJLfIxzFfeUC for ; Mon, 1 Jul 2013 00:45:50 +0200 (CEST) Original-Received: from [127.0.0.1] (66.Red-79-151-177.dynamicIP.rima-tde.net [79.151.177.66]) (using TLSv1 with cipher RC4-SHA (128/128 bits)) (No client certificate requested) (Authenticated sender: dsevilla) by xenon11.um.es (Postfix) with ESMTPSA id 6BC6B53680 for ; Mon, 1 Jul 2013 00:45:49 +0200 (CEST) User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:25.0) Gecko/20100101 Thunderbird/25.0a1 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-Received-From: 155.54.212.165 X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.14 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-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:161387 Archived-At: This is a multi-part message in MIME format. --------------010301040607060303050702 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: quoted-printable Dear all: I think I spotted an error in backquote.el answering this question in=20 stackoverflow: http://stackoverflow.com/questions/17394638/nesting-backquote-and-in-emac= s-lisp In backquote expansion, the symbol for backquote (`) is treated speciall= y=20 for nested backquoting, but its alias, backquote (if it is intended for i= t=20 to be used from elisp programs) is not correctly evaluated in nesting. Th= e=20 patch (I think) is straightforward, and I include it as an attachment, bu= t=20 you experts out there have to judge. I would like to contribute it myself, but at the moment I'm not sure of=20 the steps I have to follow to do so (sign agreement? obtain write access = to=20 repo?). Best regards, diego. --=20 Diego Sevilla Ruiz -- http://ditec.um.es/~dsevilla/ -- dsevilla@um.es _._= __ Dep. Ingenier=EDa y Tecnolog=EDa de Computadores, Facultad de Inform=E1ti= ca D|TEC Univ.de Murcia,Campus Espinardo,30080 Murcia (SPAIN),Tel.+34868887571 --------------010301040607060303050702 Content-Type: text/plain; charset=UTF-8; name="patch" Content-Transfer-Encoding: 7bit Content-Disposition: attachment; filename="patch" --- backquote-old.el 2013-07-01 00:36:28.319352290 +0200 +++ backquote.el 2013-07-01 00:37:51.550816668 +0200 @@ -161,6 +161,8 @@ (backquote-delay-process s (1- level)))) ((eq (car s) backquote-backquote-symbol) (backquote-delay-process s (1+ level))) + ((eq (car s) 'backquote) + (backquote-delay-process s (1+ level))) (t (let ((rest s) item firstlist list lists expression) @@ -177,7 +179,8 @@ ;; unquote since this needs to go recursively through ;; backquote-process. (not (or (eq (car rest) backquote-unquote-symbol) - (eq (car rest) backquote-backquote-symbol)))) + (eq (car rest) backquote-backquote-symbol) + (eq (car rest) 'backquote)))) (setq item (backquote-process (car rest) level)) (cond ((= (car item) 2) --------------010301040607060303050702--