Re: Alleged GNAT bug

[Victor Porton <porton@narod.ru>]

AdaMagica wrote:

> Am Mittwoch, 25. Oktober 2017 02:53:26 UTC+2 schrieb A. Cervetti:
>> So I conclude:
>> The error happens at the freezing point, but with gnat-2017 only in the
>> modular version. The code could be legal because it works in the
>> monolithic version, but
> 
> I guess you are right. Exporting the last instantiation Finalizer to a
> child makes the program legal.

By "you are right" you mean "The code could be legal", don't you?

Or what do you mean?

> package Term.Child is
> 
>    package Finalizer is new
>    Term_Handled_Record.With_Finalization(Term_Type_Without_Finalize);
> 
>    type Term_Type is new Finalizer.Derived with null record;
> 
> end Term.Child;
> 
> An instantiation seems to freeze the actual type 13.14(5/3), and
> Term_Type_Without_Finalize has a primitive operation involving an
> incomplete type. 13.14(10.2/4) does not apply here IMO.
> 
> But I'm in no way a language lawyer, and 13.14 is the heart of darkness.
> 
> As a side note I must say, I'm completely confused about the namings in
> this code. The type Base_Object is already finalized, and any and all
> further derivations do not add more finalizing code.

This is a shortened version of a real Ada2012 code available at
https://github.com/vporton/redland-bindings/tree/ada2012

Thus the naming.

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