From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Thien-Thi Nguyen Newsgroups: gmane.emacs.devel Subject: Re: [PATCH] use tail pointer for LOOP Date: Thu, 17 Jun 2010 09:18:28 +0200 Message-ID: <87mxuu5dq3.fsf@ambire.localdomain> References: <4C018D79.7040409@censorshipresearch.org> <4C018FD3.1020305@censorshipresearch.org> <4C01AA28.6030002@censorshipresearch.org> <9718A5AD-7A74-470B-A32D-DA14266506A3@raeburn.org> <4C01B609.6070303@censorshipresearch.org> <20100616174420.GA2847@tomas> <87fx0msv9z.fsf@lola.goethe.zz> <20100617051021.GA26623@tomas> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: dough.gmane.org 1276759471 25452 80.91.229.12 (17 Jun 2010 07:24:31 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Thu, 17 Jun 2010 07:24:31 +0000 (UTC) Cc: emacs-devel@gnu.org To: tomas@tuxteam.de Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Thu Jun 17 09:24:30 2010 connect(): No such file or directory Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1OP9Sb-0006Vr-0k for ged-emacs-devel@m.gmane.org; Thu, 17 Jun 2010 09:24:25 +0200 Original-Received: from localhost ([127.0.0.1]:47446 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1OP9SZ-0006CU-5e for ged-emacs-devel@m.gmane.org; Thu, 17 Jun 2010 03:24:23 -0400 Original-Received: from [140.186.70.92] (port=49688 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1OP9P8-0004Q0-PX for emacs-devel@gnu.org; Thu, 17 Jun 2010 03:20:52 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1OP9P7-0004ep-FY for emacs-devel@gnu.org; Thu, 17 Jun 2010 03:20:50 -0400 Original-Received: from smtp204.alice.it ([82.57.200.100]:50376) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1OP9P7-0004eK-3t for emacs-devel@gnu.org; Thu, 17 Jun 2010 03:20:49 -0400 Original-Received: from ambire.localdomain (95.244.66.34) by smtp204.alice.it (8.5.124.05) id 4C0E61C000931ECE; Thu, 17 Jun 2010 09:20:46 +0200 Original-Received: from ttn by ambire.localdomain with local (Exim 4.69) (envelope-from ) id 1OP9Mr-0002sF-0m; Thu, 17 Jun 2010 09:18:29 +0200 In-Reply-To: <20100617051021.GA26623@tomas> (tomas@tuxteam.de's message of "Thu, 17 Jun 2010 07:10:21 +0200") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.0.50 (gnu/linux) X-detected-operating-system: by eggs.gnu.org: Genre and OS details not recognized. X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:126061 Archived-At: () tomas@tuxteam.de () Thu, 17 Jun 2010 07:10:21 +0200 Still, reversing seems to be worth it (by some 30 percent). Unless we find some way to streamline the tail pointer better. How does this variant fare? (defun copy3 (lst) "Return a copy of LST." (let* ((box (list nil)) (tp box)) (while lst (setq tp (cdr (nconc tp (list (pop lst)))))) (cdr box))) thi