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!b28g2000cwb.googlegroups.com!not-for-mail From: "Isaac Gouy" Newsgroups: comp.lang.ada Subject: Re: ada is getting spanked :( Date: 29 Oct 2006 17:01:49 -0800 Organization: http://groups.google.com Message-ID: <1162170109.708563.132430@b28g2000cwb.googlegroups.com> References: <1162052997.664967.135910@e3g2000cwe.googlegroups.com> <3321666.DLNnW6yRHq@linux1.krischik.com> <1162085683.30292.23.camel@localhost.localdomain> <1162097331.237700.278880@m73g2000cwd.googlegroups.com> NNTP-Posting-Host: 24.6.127.160 Mime-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" X-Trace: posting.google.com 1162170114 25422 127.0.0.1 (30 Oct 2006 01:01:54 GMT) X-Complaints-To: groups-abuse@google.com NNTP-Posting-Date: Mon, 30 Oct 2006 01:01:54 +0000 (UTC) In-Reply-To: <1162097331.237700.278880@m73g2000cwd.googlegroups.com> 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: b28g2000cwb.googlegroups.com; posting-host=24.6.127.160; posting-account=7DGySgwAAADWW5O_600A0X4F7Tvs4mwJ Xref: g2news2.google.com comp.lang.ada:7272 Date: 2006-10-29T17:01:49-08:00 List-Id: Isaac Gouy wrote: > 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 :-) And that has now been done (although it will be a little while before the ripple reaches the Debian/AMD measurements).