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=unavailable autolearn_force=no version=3.4.4
Path: 
 eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!news.eternal-september.org!news.eternal-september.org!news.eternal-september.org!feeder.eternal-september.org!news.swapon.de!fu-berlin.de!uni-berlin.de!individual.net!not-for-mail
From: Bill Findlay <yaldnif.w@blueyonder.co.uk>
Newsgroups: comp.lang.ada
Subject: Re: GCC 4.8.1 for Mac OS X
Date: Sun, 07 Jul 2013 23:02:38 +0100
Message-ID: <CDFFA40E.32082%yaldnif.w@blueyonder.co.uk>
References: <lya9lyz06p.fsf@pushface.org>
Mime-Version: 1.0
Content-Type: text/plain;
	charset="US-ASCII"
Content-Transfer-Encoding: 7bit
X-Trace: individual.net thVxP5M20yDb5a6Izzp66QxS+UvH55AO9ugeRTPqz/tOSLo/HT
Cancel-Lock: sha1:1zBi+DmzbDUXgrF4yXdb2nKpavA=
User-Agent: Microsoft-Entourage/12.36.0.130206
Thread-Topic: GCC 4.8.1 for Mac OS X
Thread-Index: Ac57XbF5JROsvRn0TkaaKvaXNovvww==
Xref: news.eternal-september.org comp.lang.ada:16146
Date: 2013-07-07T23:02:38+01:00
List-Id: <comp.lang.ada>

On 07/07/2013 19:37, in article lya9lyz06p.fsf@pushface.org, "Simon Wright"
<simon@pushface.org> wrote:

> You can find this at
> https://sourceforge.net/projects/gnuada/files/GNAT_GCC%20Mac%20OS%20X/4.8.1/
> 

Many thanks for that, Simon.
I see it shares with GNAT GPL 2013 this foible:

function hash_fn2 (the_key : naming.id)
return   hash_code is
   slice : constant slice_list
      with Import, Convention => Ada, Address => the_key'Address;
   h     : hash_code := 0;
begin
   for s of slice loop
   exit when s = all_blanks_code;
             |
>>> warning: variable "s" is not modified in loop body [enabled by default]
>>> warning: possible infinite loop [enabled by default]
      h := rotate_left(h, 2) + s;
   end loop;
   h := avalanche(h);
   return (if h = empty_hash_code then empty_hash_code + 1 else h);
end hash_fn2;


-- 
Bill Findlay
with blueyonder.co.uk;
use  surname & forename;