From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM
	autolearn=ham autolearn_force=no version=3.4.4
X-Google-Thread: 103376,278bf0771374076e
X-Google-Attributes: gid103376,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news2.google.com!postnews.google.com!m73g2000cwd.googlegroups.com!not-for-mail
From: "Isaac Gouy" <igouy@yahoo.com>
Newsgroups: comp.lang.ada
Subject: Re: ada is getting spanked :(
Date: 28 Oct 2006 21:48:51 -0700
Organization: http://groups.google.com
Message-ID: <1162097331.237700.278880@m73g2000cwd.googlegroups.com>
References: <1162052997.664967.135910@e3g2000cwe.googlegroups.com>
   <3321666.DLNnW6yRHq@linux1.krischik.com>
   <1162085683.30292.23.camel@localhost.localdomain>
   <h7U0h.256314$1i1.114545@attbi_s72>
NNTP-Posting-Host: 24.6.127.160
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"
X-Trace: posting.google.com 1162097337 9689 127.0.0.1 (29 Oct 2006 04:48:57
 GMT)
X-Complaints-To: groups-abuse@google.com
NNTP-Posting-Date: Sun, 29 Oct 2006 04:48:57 +0000 (UTC)
In-Reply-To: <h7U0h.256314$1i1.114545@attbi_s72>
User-Agent: G2/1.0
X-HTTP-UserAgent: Mozilla/5.0 (X11; U; Linux i686; en-US;
 rv:1.8.0.5) Gecko/20060910 Epiphany/2.14 SeaMonkey/1.0.3,gzip(gfe),gzip(gfe)
Complaints-To: groups-abuse@google.com
Injection-Info: m73g2000cwd.googlegroups.com; posting-host=24.6.127.160;
   posting-account=7DGySgwAAADWW5O_600A0X4F7Tvs4mwJ
Xref: g2news2.google.com comp.lang.ada:7255
Date: 2006-10-28T21:48:51-07:00
List-Id: <comp.lang.ada>


Jeffrey R. Carter wrote:
> Georg Bauhaus wrote:
> >
> > In order to optimize GNAT's standing, I have made a small
> > but quite effective change to one of Jim Rogers' programs
> > (regex-dna #2), the factor is 14 (fourteen). Nothing submitted
> > yet, please use this as a starting point if you like.
>
> I've found a small change that improves the nsieve program (also Jim
> Rogers). Change the line
>
> S (I) := False;
>
> to
>
> if S (I) then
>     S (I) := False;
> end if;
>
> on my computer (3.2 GHz Pentium 4 HT), compiled with MinGW GNAT 3.4.2 with
>
> -O3 -gnatnp -march=pentium4 -fomit-frame-pointer
>
> the time was reduced from about 1.8 s for the original to about 1.1 s
> with this modification, a speedup of 38.9%. Applied to the 2.71 s
> reported time, that would give GNAT 1.66 s, which would move it to 3rd
> place.
>
> I hope no one thinks we're picking on Jim.
>
> --
> Jeff Carter
> "Your mother was a hamster and your father smelt of elderberries."
> Monty Python & the Holy Grail
> 06

Thanks for the reminder that I should throwout/fix the programs that
use a test to avoid doing what the benchmark description asks them to
do :-)