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 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Thread: a07f3367d7,3a6a9f1d654285ba
X-Google-Attributes: gida07f3367d7,public,usenet
X-Google-NewGroupId: yes
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news2.google.com!news4.google.com!proxad.net!feeder1-2.proxad.net!213.200.89.82.MISMATCH!tiscali!newsfeed1.ip.tiscali.net!newsfeed.tiscali.ch!npeer.de.kpn-eurorings.net!npeer-ng0.de.kpn-eurorings.net!newsfeed.arcor.de!newsspool3.arcor-online.net!news.arcor.de.POSTED!not-for-mail
Date: Thu, 03 Sep 2009 17:28:14 +0200
From: Georg Bauhaus <rm.dash-bauhaus@futureapps.de>
User-Agent: Thunderbird 2.0.0.23 (Macintosh/20090812)
MIME-Version: 1.0
Newsgroups: comp.lang.ada
Subject: Re: Ada Shootout program for K-Nucleotide (patches)
References: <4a743343$0$32674$9b4e6d93@newsspool2.arcor-online.net>
 <3f9f9e21-e088-4fbe-baac-dd43fdf6b911@r38g2000yqn.googlegroups.com>
 <4a757b0d$0$31328$9b4e6d93@newsspool4.arcor-online.net>
 <4a9fc85a$0$2850$ba620e4c@news.skynet.be>
In-Reply-To: <4a9fc85a$0$2850$ba620e4c@news.skynet.be>
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit
Message-ID: <4a9fe08e$0$32680$9b4e6d93@newsspool2.arcor-online.net>
Organization: Arcor
NNTP-Posting-Date: 03 Sep 2009 17:28:15 CEST
NNTP-Posting-Host: 6c342b8d.newsspool2.arcor-online.net
X-Trace: 
 DXC=jOiamBK<^Ykm7>ihJR;B_cA9EHlD;3Ycb4Fo<]lROoRa^YC2XCjHcbiSkTR2Qd1c^f;9OJDO8_SKfNSZ1n^B98ijGXVh[l:]n2m
X-Complaints-To: usenet-abuse@arcor.de
Xref: g2news2.google.com comp.lang.ada:8130
Date: 2009-09-03T17:28:15+02:00
List-Id: <comp.lang.ada>

Olivier Scalbert schrieb:

> One question:
> I have tried to profile knucleotide, so I have recompile it after
> removing all the inlines and optimization:

Thanks for doing so.  Ludovic has mentioned -gnatN.

If all goes well I will put a new multitasking
version at the given address later this evening.
This will include all new patches we have collected
so far.

In order for gprof to show something that makes sense
(to me, at least), it seems a good idea to use an alphabetically
named Fragments."=" function.

package Fragments ...

   function Equals (Left, Right: Fragment) return Boolean is ...
   function "=" (Left, Right: Fragment) return Boolean
     renames Equals;

Then, use Equals in the actual parameter list for the table
generic.  I have used the single task program
the Shootout collection.

$ gnatmake -gnato -march=native -g -pg \
  -f knucleotide.adb -o knucleotide.gnat_run

Maybe without -gnato, and gradually increasing optimization.