diff options
author | Piotr Trojanek <trojanek@adacore.com> | 2020-06-24 19:18:19 +0200 |
---|---|---|
committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2020-10-15 05:39:12 -0400 |
commit | e4f503be5d8f4b6f985f91ffe8a42ed9663466b3 (patch) | |
tree | 011fa2253489e87e1adfe32feb96472a878e7f7d | |
parent | a0a294d3eb78eac2932756a6de8372a8de947567 (diff) | |
download | gcc-e4f503be5d8f4b6f985f91ffe8a42ed9663466b3.zip gcc-e4f503be5d8f4b6f985f91ffe8a42ed9663466b3.tar.gz gcc-e4f503be5d8f4b6f985f91ffe8a42ed9663466b3.tar.bz2 |
[Ada] Fix access to uninitialized global variable when emitting error
gcc/ada/
* sem_util.adb (Bad_Predicated_Subtype_Use): Emit an
unconditional error, not a conditional warning.
-rw-r--r-- | gcc/ada/sem_util.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sem_util.adb b/gcc/ada/sem_util.adb index 1533630..2b92cad 100644 --- a/gcc/ada/sem_util.adb +++ b/gcc/ada/sem_util.adb @@ -982,7 +982,7 @@ package body Sem_Util is Reason => PE_Bad_Predicated_Generic_Type)); else - Error_Msg_FE (Msg & "<<", N, Typ); + Error_Msg_FE (Msg, N, Typ); end if; else |