comp.lang.ada
 help / color / mirror / Atom feed
From: "Dmitry A. Kazakov" <mailbox@dmitry-kazakov.de>
Subject: Re: gnoga build fails on Mac
Date: Sun, 21 Jun 2020 10:41:55 +0200	[thread overview]
Message-ID: <rcn6gi$1nbc$1@gioia.aioe.org> (raw)
In-Reply-To: 4bbbd09e-e14f-46f5-a510-bdf0c17eba8fo@googlegroups.com

On 21/06/2020 09:57, Roger wrote:
> Mac Mini (2018)
> OSX 10.15.5
> XCode 11.5
> GNAT  Community Edition 2020
> 
> Attempting to build git clone git://git.code.sf.net/p/gnoga/code gnoga.
> 
> First problem with -gnat05 flag which I overcame but probably not the correct way.
> Second, killer, problem:
> object-handle.adb:153:22: access attribute cannot be used as actual for universal_access equality
> object-handle.adb:163:23: access attribute cannot be used as actual for universal_access equality
> 
> How can I fix this?

GNAT CE 2020 does not accept comparisons like:

    procedure Foo (X : access T) is
    begin
       ...
       if Y'Access = X then
       ...

I cannot say anything about legality of such comparisons, maybe the 
change is related to the upcoming standard, maybe it was never legal.

The latest version 4.50 of the Simple Components fixes the issue by 
replacing access types comparison with by address comparison. [*]

    http://www.dmitry-kazakov.de/ada/components.htm

Replace the offending source files and it should compile again.

-------------------
* I don't know the motivation behind forbidding comparison of access 
attribute, probably some obscure unlikely portability case. Comparing 
addresses would be less safe, for sure, but not much.

-- 
Regards,
Dmitry A. Kazakov
http://www.dmitry-kazakov.de

  reply	other threads:[~2020-06-21  8:41 UTC|newest]

Thread overview: 20+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2020-06-21  7:57 gnoga build fails on Mac Roger
2020-06-21  8:41 ` Dmitry A. Kazakov [this message]
2020-06-21 11:18   ` Roger
2020-06-21 13:28     ` Dmitry A. Kazakov
2020-06-22  3:15       ` Roger
2020-06-22  5:56         ` Dmitry A. Kazakov
2020-06-22  6:14           ` Roger
2020-06-22 11:37           ` Jeffrey R. Carter
2020-06-22 23:25             ` Roger
2020-06-23 11:27               ` Jeffrey R. Carter
2020-06-29  0:55             ` Randy Brukardt
2020-06-29  8:29               ` Jeffrey R. Carter
2020-07-01  1:09                 ` Randy Brukardt
2020-07-01  8:52                   ` Jeffrey R. Carter
2020-07-03  0:23                     ` Randy Brukardt
2020-07-03  9:09                       ` Jeffrey R. Carter
2020-07-07 14:41                         ` Shark8
2020-07-07 15:37                           ` Jeffrey R. Carter
2020-06-21 14:24 ` Jeffrey R. Carter
2020-06-21 16:46   ` Simon Wright
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox