diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2017-06-12 11:28:33 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2017-06-12 11:28:33 +0000 |
| commit | 3b387bff56ed5ca2df4f271540ea9839ba84e57e (patch) | |
| tree | 218fbde30c86d1b874211d71bdf96ed9792b33f8 | |
| parent | c725f69cdbd6f33c50c04c9fa2177b294149a9ef (diff) | |
| download | gcc-3b387bff56ed5ca2df4f271540ea9839ba84e57e.zip gcc-3b387bff56ed5ca2df4f271540ea9839ba84e57e.tar.gz gcc-3b387bff56ed5ca2df4f271540ea9839ba84e57e.tar.bz2 | |
re PR bootstrap/80897 (gnat bootstrap broken on SPARC64/Linux)
PR bootstrap/80897
* exp_ch3.adb (Make_Predefined_Primitive_Specs): Use Positive index.
From-SVN: r249119
| -rw-r--r-- | gcc/ada/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/ada/exp_ch3.adb | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 07ddbe8..30290fa 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,5 +1,10 @@ 2017-06-12 Eric Botcazou <ebotcazou@adacore.com> + PR bootstrap/80897 + * exp_ch3.adb (Make_Predefined_Primitive_Specs): Use Positive index. + +2017-06-12 Eric Botcazou <ebotcazou@adacore.com> + PR ada/81070 * s-interr-hwint.adb: Reinstate. * gcc-interface/Makefile.in (RTEMS): Use it again. diff --git a/gcc/ada/exp_ch3.adb b/gcc/ada/exp_ch3.adb index 6d9bdaa..00d74c5 100644 --- a/gcc/ada/exp_ch3.adb +++ b/gcc/ada/exp_ch3.adb @@ -9216,7 +9216,7 @@ package body Exp_Ch3 is declare Stream_Op_TSS_Names : - constant array (Integer range <>) of TSS_Name_Type := + constant array (Positive range <>) of TSS_Name_Type := (TSS_Stream_Read, TSS_Stream_Write, TSS_Stream_Input, |