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: 18 May 2004 10:29:39 +0900 Sender: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Message-ID: References: <85ekpz5twj.fsf@junk.nocrew.org> <874qqiao9o.fsf@tc-1-100.kawasaki.gol.ne.jp> <20040515231012.GA20052@fencepost> <20040517220612.GA6421@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 1084844773 14564 80.91.224.253 (18 May 2004 01:46:13 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Tue, 18 May 2004 01:46:13 +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 Tue May 18 03:46:04 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 1BPtgC-0003yH-00 for ; Tue, 18 May 2004 03:46:04 +0200 Original-Received: from monty-python.gnu.org ([199.232.76.173]) by quimby.gnus.org with esmtp (Exim 3.35 #1 (Debian)) id 1BPtgC-0003dm-00 for ; Tue, 18 May 2004 03:46:04 +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 1BPtSG-0003VJ-9n for emacs-devel@quimby.gnus.org; Mon, 17 May 2004 21:31:40 -0400 Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.34) id 1BPtRo-0003Ud-Jr for emacs-devel@gnu.org; Mon, 17 May 2004 21:31:12 -0400 Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.34) id 1BPtRG-0003NB-OM for emacs-devel@gnu.org; Mon, 17 May 2004 21:31:10 -0400 Original-Received: from [202.32.8.202] (helo=TYO202.gate.nec.co.jp) by monty-python.gnu.org with esmtp (Exim 4.34) id 1BPtQb-000399-CK; Mon, 17 May 2004 21:29:57 -0400 Original-Received: from mailgate3.nec.co.jp (mailgate53.nec.co.jp [10.7.69.161] (may be forged)) by TYO202.gate.nec.co.jp (8.11.7/3.7W01080315) with ESMTP id i4I1TkY13176; Tue, 18 May 2004 10:29:46 +0900 (JST) Original-Received: (from root@localhost) by mailgate3.nec.co.jp (8.11.7/3.7W-MAILGATE-NEC) id i4I1Ti012952; Tue, 18 May 2004 10:29:45 +0900 (JST) Original-Received: from edtmg03.lsi.nec.co.jp ([10.26.16.203]) by mailsv.nec.co.jp (8.11.7/3.7W-MAILSV-NEC) with ESMTP id i4I1Th323676; Tue, 18 May 2004 10:29:44 +0900 (JST) Original-Received: from mcsss2.ucom.lsi.nec.co.jp (localhost [127.0.0.1]) by edtmg03.lsi.nec.co.jp (8.12.10/8.12.10) with ESMTP id i4I1TfkN024863; Tue, 18 May 2004 10:29:42 +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 i4I1TdaQ021916; Tue, 18 May 2004 10:29:39 +0900 (JST) Original-Received: by mctpc71 (Postfix, from userid 31295) id A4E1F4F6; Tue, 18 May 2004 10:29:39 +0900 (JST) Original-To: David Kastrup System-Type: i686-pc-linux-gnu Blat: Foop In-Reply-To: Original-Lines: 27 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:23609 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:23609 David Kastrup writes: > Without lexical binding, currying a curried function would probably > not work when using the lambda approach (haven't thought this through > in detail, though). It should, I'd think -- the method suggested for using lambda to do it is to construct a lambda expression at runtime, e.g., (defun curry (fun &rest args) `(lambda (&rest user-args) (apply #',fun ,@args user-args))) So currying a curried function does work, if rather `consily': (curry (curry 'concat "a" "b") "x" "y") => (lambda (&rest user-args) (apply (function (lambda (&rest user-args) (apply (function concat) "a" "b" user-args))) "x" "y" user-args)) (mapcar (curry (curry 'concat "a" "b") "x" "y") '("p" "q")) => ("abxyp" "abxyq") -Miles -- "Whatever you do will be insignificant, but it is very important that you do it." Mahatma Gandhi