Commit 4c439306 by Eric Botcazou Committed by Eric Botcazou

* sem_ch3.adb (Build_Derived_Record_Type): Fix long line.

From-SVN: r246670
parent 71a20c55
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 ...@@ -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.
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment