* sem_ch3.adb (Build_Derived_Record_Type): Fix long line.
From-SVN: r246670
This commit is contained in:
parent
71a20c55fd
commit
4c43930609
|
@ -1,3 +1,7 @@
|
||||||
|
2017-04-04 Eric Botcazou <ebotcazou@adacore.com>
|
||||||
|
|
||||||
|
* sem_ch3.adb (Build_Derived_Record_Type): Fix long line.
|
||||||
|
|
||||||
2017-04-03 Jonathan Wakely <jwakely@redhat.com>
|
2017-04-03 Jonathan Wakely <jwakely@redhat.com>
|
||||||
|
|
||||||
* doc/gnat_ugn/gnat_and_program_execution.rst: Fix typo.
|
* doc/gnat_ugn/gnat_and_program_execution.rst: Fix typo.
|
||||||
|
|
|
@ -8706,7 +8706,7 @@ package body Sem_Ch3 is
|
||||||
|
|
||||||
-- However, if the record contains an array constrained by
|
-- However, if the record contains an array constrained by
|
||||||
-- the discriminant but with some different bound, the compiler
|
-- the discriminant but with some different bound, the compiler
|
||||||
-- attempts to create a smaller range for the discriminant type.
|
-- tries to create a smaller range for the discriminant type.
|
||||||
-- (See exp_ch3.Adjust_Discriminants). In this case, where
|
-- (See exp_ch3.Adjust_Discriminants). In this case, where
|
||||||
-- the discriminant type is a scalar type, the check must use
|
-- the discriminant type is a scalar type, the check must use
|
||||||
-- the original discriminant type in the parent declaration.
|
-- the original discriminant type in the parent declaration.
|
||||||
|
|
Loading…
Reference in New Issue