From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Barry OReilly Newsgroups: gmane.emacs.bugs Subject: bug#14892: [PATCH] Enhance Elisp compare functions (< <= > >=) to take var args Date: Mon, 9 Sep 2013 18:53:27 -0400 Message-ID: References: NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: multipart/alternative; boundary=001a1134cc3ea7eacc04e5fb4154 X-Trace: ger.gmane.org 1378767260 15922 80.91.229.3 (9 Sep 2013 22:54:20 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Mon, 9 Sep 2013 22:54:20 +0000 (UTC) Cc: 14892@debbugs.gnu.org To: Stefan Monnier Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Tue Sep 10 00:54:22 2013 Return-path: Envelope-to: geb-bug-gnu-emacs@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 1VJALc-0003Bc-4J for geb-bug-gnu-emacs@m.gmane.org; Tue, 10 Sep 2013 00:54:20 +0200 Original-Received: from localhost ([::1]:53983 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1VJALb-0006fW-GI for geb-bug-gnu-emacs@m.gmane.org; Mon, 09 Sep 2013 18:54:19 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:43842) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1VJALT-0006fO-FP for bug-gnu-emacs@gnu.org; Mon, 09 Sep 2013 18:54:16 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1VJALL-0007Ms-VS for bug-gnu-emacs@gnu.org; Mon, 09 Sep 2013 18:54:11 -0400 Original-Received: from debbugs.gnu.org ([140.186.70.43]:42767) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1VJALL-0007Mo-RA for bug-gnu-emacs@gnu.org; Mon, 09 Sep 2013 18:54:03 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.80) (envelope-from ) id 1VJALK-00025I-OZ for bug-gnu-emacs@gnu.org; Mon, 09 Sep 2013 18:54:03 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Barry OReilly Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Mon, 09 Sep 2013 22:54:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 14892 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: patch Original-Received: via spool by 14892-submit@debbugs.gnu.org id=B14892.13787672177977 (code B ref 14892); Mon, 09 Sep 2013 22:54:02 +0000 Original-Received: (at 14892) by debbugs.gnu.org; 9 Sep 2013 22:53:37 +0000 Original-Received: from localhost ([127.0.0.1]:51060 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1VJAKu-00024Y-0H for submit@debbugs.gnu.org; Mon, 09 Sep 2013 18:53:36 -0400 Original-Received: from mail-we0-f179.google.com ([74.125.82.179]:48868) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1VJAKr-00024L-VL for 14892@debbugs.gnu.org; Mon, 09 Sep 2013 18:53:34 -0400 Original-Received: by mail-we0-f179.google.com with SMTP id x55so4771717wes.24 for <14892@debbugs.gnu.org>; Mon, 09 Sep 2013 15:53:28 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113; h=mime-version:in-reply-to:references:date:message-id:subject:from:to :cc:content-type; bh=dFygJq0/5El0yLciUS57s14CSHL9GKiDqlThZyAZh7w=; b=lhZXrDcYTQnhbuqLxNh3n7MrC1eCYsLPCXsC5ga+efcdPidT325c8aC/wdeUJKvUIt zwO+JyRX5fq5xkV6n2250p4Ec2gHpFY9EHhKCz3aWvZRrOICb5nB7J8xGf1x3WP7bWNK 4dKUoaKWbNWZBkh4G34KpN09K8iJ+R0kFR6G7E9uXNqdQFaIYYv1kPjl/CPrmZFCttsR T6vwrVZMbqiMPxArgynVVFJ2uIcu+8mTY5CixKuL3SLRL2HBqQ0mef1Gb0ZCn5t/dq49 02UeTXCUsMujsvNFAeK+segHJJp2FLsZbtw5I1LfGuWdTEBOqKVstDwrZXz8c7uPUmoO Bvew== X-Received: by 10.180.216.97 with SMTP id op1mr992169wic.26.1378767207916; Mon, 09 Sep 2013 15:53:27 -0700 (PDT) Original-Received: by 10.194.234.234 with HTTP; Mon, 9 Sep 2013 15:53:27 -0700 (PDT) In-Reply-To: X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.15 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 3.x X-Received-From: 140.186.70.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:78155 Archived-At: --001a1134cc3ea7eacc04e5fb4154 Content-Type: text/plain; charset=ISO-8859-1 > Do you have some performance numbers? Let arithcompare-benchmark.el contain: (defun arithcompare-many (lhs rhs) (dotimes (_ (floor 1e6)) (< lhs rhs))) (message "%s" (benchmark-run 1 (arithcompare-many 100 101))) Run by: emacs -Q --batch -f batch-byte-compile arithcompare-benchmark.el && emacs -Q --batch --load arithcompare-benchmark.elc The results averaged over ten trials each: Before patch: (0.061 0 0.0) After patch: (0.084 0 0.0) In GNU Emacs 24.3.50.1 (x86_64-unknown-linux-gnu, GTK+ Version 2.10.4) Windowing system distributor `The X.Org Foundation', version 11.0.70101000 System Description: Red Hat Enterprise Linux Client release 5.4 (Tikanga) --001a1134cc3ea7eacc04e5fb4154 Content-Type: text/html; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable
> Do you have some performance numbers?

Let arit= hcompare-benchmark.el contain:

=A0 (defun arithcompare-many (lhs rhs= )
=A0=A0=A0 (dotimes (_ (floor 1e6))
=A0=A0=A0=A0=A0 (< lhs rhs)))=
=A0 (message "%s" (benchmark-run 1 (arithcompare-many 100 101= )))

Run by:

=A0 emacs -Q --batch -f batch-byte-compile arithcompare-= benchmark.el && emacs -Q --batch --load arithcompare-benchmark.elc<= br>
The results averaged over ten trials each:

=A0 Before patch: = (0.061 0 0.0)
=A0 After patch: (0.084 0 0.0)

In GNU Emacs 24.3.50.1 (x86_64-unknow= n-linux-gnu, GTK+ Version 2.10.4)
Windowing system distributor `The X.Or= g Foundation', version 11.0.70101000
System Description:=A0=A0=A0 Re= d Hat Enterprise Linux Client release 5.4 (Tikanga)

--001a1134cc3ea7eacc04e5fb4154--