diff options
| author | ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4> | 2017-04-04 06:33:33 +0000 |
|---|---|---|
| committer | ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4> | 2017-04-04 06:33:33 +0000 |
| commit | c5412c55023e2a3c4fb237a0f74a08522c2e69c1 (patch) | |
| tree | 700258275e0946095adc4f6e56af5d9782ef4286 /gcc/ada | |
| parent | 939bb9ffb3ea432bd5c7b96dfaf5809d0b668d8f (diff) | |
| download | gcc-c5412c55023e2a3c4fb237a0f74a08522c2e69c1.tar.gz | |
* sem_ch3.adb (Build_Derived_Record_Type): Fix long line.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@246670 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada')
| -rw-r--r-- | gcc/ada/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/ada/sem_ch3.adb | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 127a181431f..6b0ae2d4d06 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -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> * doc/gnat_ugn/gnat_and_program_execution.rst: Fix typo. diff --git a/gcc/ada/sem_ch3.adb b/gcc/ada/sem_ch3.adb index de3a49e2910..7c3f7e601c0 100644 --- a/gcc/ada/sem_ch3.adb +++ b/gcc/ada/sem_ch3.adb @@ -8706,7 +8706,7 @@ package body Sem_Ch3 is -- However, if the record contains an array constrained by -- 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 -- the discriminant type is a scalar type, the check must use -- the original discriminant type in the parent declaration. |