From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Miles Bader Newsgroups: gmane.emacs.devel Subject: Re: User-reserved element in byte code vectors Date: 19 May 2004 15:37:16 +0900 Sender: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Message-ID: References: <874qqiao9o.fsf@tc-1-100.kawasaki.gol.ne.jp> <20040515231012.GA20052@fencepost> <20040517220612.GA6421@fencepost> <20040518234546.GA32327@fencepost> Reply-To: Miles Bader NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1084949186 13923 80.91.224.253 (19 May 2004 06:46:26 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Wed, 19 May 2004 06:46:26 +0000 (UTC) Cc: lars@nocrew.org, Stefan Monnier , rms@gnu.org, emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Wed May 19 08:46:18 2004 Return-path: Original-Received: from quimby.gnus.org ([80.91.224.244]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1BQKqI-0000Jj-00 for ; Wed, 19 May 2004 08:46:18 +0200 Original-Received: from monty-python.gnu.org ([199.232.76.173]) by quimby.gnus.org with esmtp (Exim 3.35 #1 (Debian)) id 1BQKqI-0008Hu-00 for ; Wed, 19 May 2004 08:46:18 +0200 Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.34) id 1BQKmu-0003Qj-Hq for emacs-devel@quimby.gnus.org; Wed, 19 May 2004 02:42:48 -0400 Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.34) id 1BQKmS-0003OR-Ux for emacs-devel@gnu.org; Wed, 19 May 2004 02:42:20 -0400 Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.34) id 1BQKiU-0002Qg-EP for emacs-devel@gnu.org; Wed, 19 May 2004 02:38:46 -0400 Original-Received: from [202.32.8.214] (helo=TYO201.gate.nec.co.jp) by monty-python.gnu.org with esmtp (Exim 4.34) id 1BQKhw-00024W-PG; Wed, 19 May 2004 02:37:41 -0400 Original-Received: from mailgate3.nec.co.jp (mailgate53.nec.co.jp [10.7.69.160] (may be forged)) by TYO201.gate.nec.co.jp (8.11.7/3.7W01080315) with ESMTP id i4J6bKp24604; Wed, 19 May 2004 15:37:20 +0900 (JST) Original-Received: (from root@localhost) by mailgate3.nec.co.jp (8.11.7/3.7W-MAILGATE-NEC) id i4J6bKb23127; Wed, 19 May 2004 15:37:20 +0900 (JST) Original-Received: from edtmg04.lsi.nec.co.jp ([10.26.17.201]) by mailsv.nec.co.jp (8.11.7/3.7W-MAILSV-NEC) with ESMTP id i4J6bJ324280; Wed, 19 May 2004 15:37:19 +0900 (JST) Original-Received: from mcsss2.ucom.lsi.nec.co.jp (localhost [127.0.0.1]) by edtmg04.lsi.nec.co.jp (8.12.10/8.12.10) with ESMTP id i4J6bHhw015994; Wed, 19 May 2004 15:37:17 +0900 (JST) Original-Received: from mctpc71 (mctpc71.ucom.lsi.nec.co.jp [10.30.118.121]) by mcsss2.ucom.lsi.nec.co.jp (8.12.10/8.12.8/EDcg v2.01-mc/1046780839) with ESMTP id i4J6bGaQ028471; Wed, 19 May 2004 15:37:16 +0900 (JST) Original-Received: by mctpc71 (Postfix, from userid 31295) id 390CA4F6; Wed, 19 May 2004 15:37:16 +0900 (JST) Original-To: David Kastrup System-Type: i686-pc-linux-gnu Blat: Foop In-Reply-To: Original-Lines: 24 X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.4 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Xref: main.gmane.org gmane.emacs.devel:23689 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:23689 David Kastrup writes: > > So I think you'd have to explicitly include the dividing point, e.g.: > > > > (defmacro rcurry (f &rest args) > > `(curry rcurry-helper (length args) f ,@args)) > > If one does need a helper, one could probably just do > > (defmacro rcurry (f &rest args) > `(curry rcurry-helper f ,args)) Hmmm, I presume you meant: (defmacro rcurry (f &rest args) `(curry rcurry-helper f (list ,@args))) But I think given the way the implementation works, just including the dividing point as an integer would be faster (can use bcopy instead of list traversal) and consume less space overall (a vector slot for each arg is cheaper than a cons cell for each). -Miles -- If you can't beat them, arrange to have them beaten. [George Carlin]