comp.lang.ada
 help / color / mirror / Atom feed
From: Victor Porton <porton@narod.ru>
Subject: Re: Unchecked_Union record inside an other record - trouble
Date: Fri, 08 Aug 2014 19:56:15 +0300
Date: 2014-08-08T19:56:15+03:00	[thread overview]
Message-ID: <ls2vfc$qit$1@speranza.aioe.org> (raw)
In-Reply-To: ac7bcc2f-cafb-4bcc-a52e-931c094ce45a@googlegroups.com

Adam Beneschan wrote:

> On Friday, August 8, 2014 8:36:48 AM UTC-7, Victor Porton wrote:
>> I am trying to interface my program with a C library.
> 
>> The below program does not compile:
>> main.adb:19:14: unconstrained subtype in component declaration
> 
>> If this does not work, what should I do to interface a union inside a
>> struct in a C library?
> 
>> -- main.adb
>> 
>> with Interfaces.C; use Interfaces.C;
> 
>> procedure Main is
> 
>>    type Kind is (First, Second);
>  
>>    type T(K: Kind) is
> 
> change this to
> 
>      type T(K: Kind := Kind'First) is

Done.

But it is a hack.

I propose to change ARM not to require a discriminant in this specific case 
(Unchecked_Union).

-- 
Victor Porton - http://portonvictor.org


  reply	other threads:[~2014-08-08 16:56 UTC|newest]

Thread overview: 17+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2014-08-08 15:36 Unchecked_Union record inside an other record - trouble Victor Porton
2014-08-08 16:01 ` Adam Beneschan
2014-08-08 16:56   ` Victor Porton [this message]
2014-08-08 18:52     ` Shark8
2014-08-08 19:56       ` Victor Porton
2014-08-08 20:06         ` Pascal Obry
2014-08-08 20:09         ` Shark8
2014-08-08 20:12           ` Victor Porton
2014-08-08 20:22             ` Shark8
2014-08-08 20:28               ` Victor Porton
2014-08-08 21:07                 ` Shark8
2014-08-08 19:52   ` Victor Porton
2014-08-08 19:57     ` Adam Beneschan
2014-08-08 19:21 ` Per Sandberg
2014-08-08 20:01   ` Victor Porton
2014-08-08 21:23   ` Jeffrey Carter
2014-08-10  7:25     ` Per Sandberg
replies disabled

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