Re: GNAT GPL 2009 for Mac OS X (Snow Leopard)

[sjw <simon.j.wright@mac.com>]

On Dec 22, 5:10 pm, sjw <simon.j.wri...@mac.com> wrote:
> On Dec 22, 2:23 pm, "(see below)" <yaldni...@blueyonder.co.uk> wrote:
>
> > On 22/12/2009 12:09, in article
> > af608388-8088-4779-a3ca-39275fd2c...@r24g2000yqd.googlegroups.com, "sjw"
>
> > <simon.j.wri...@mac.com> wrote:
> > > I've just released a 32-bit build of GNAT GPL 2009 for Snow Leopard;
> > > find it athttp://sourceforge.net/projects/gnuada/files/(navigateto
> > > GNAT_GPL Mac OS X/2009-snow-leopard-i386).
>
> > Many thanks -- I'll try it ASAP.
> > Any chance of a 64-bit build?
>
> Will have a go, but it's a cross-build so may take some getting my
> head round!

The cross-build (I think I may be wrong about that; perhaps there's an
'architecture' switch?) eventually produced a compiler. Unfortunately
it wouldn't process the simplest exception properly (SIGABRT).

I then had the idea, since the problem that stops building is that
init.c calls sigreturn() which isn't present in Snow Leopard, why not
fake up our own sigreturn() that does exactly what the patch did, then
link against that?

This turned out to work as hoped, result being that we can use Apple's
GNAT-GPL-2009 on Snow Leopard; see http://sourceforge.net/projects/gnuada/files/(navigate
to GNAT_GPL Mac OS X/2009-snow-leopard, get sigreturn.tar.bz2).

Sadly, the failure to handle exceptions with the 64-bit compiler is
unchanged (the 32-bit compiler is OK):

with Ada.Text_IO; use Ada.Text_IO;
procedure Raiser is
begin
   begin
      raise Constraint_Error;
   exception
      when Constraint_Error =>
         Put_Line ("CE raised.");
   end;
end Raiser;

nidhoggr:Test simon$ GNAT_PREFIX=/opt/gnat-gpl-2009_64-leopard
gnatmake -g -f raiser -largs sigreturn-64.o
gcc -c -g raiser.adb
gnatbind -x raiser.ali
gnatlink raiser.ali -g sigreturn-64.o
nidhoggr:Test simon$ ./raiser
Segmentation fault


Rats.