aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPiotr Trojanek <trojanek@adacore.com>2020-06-24 19:18:19 +0200
committerPierre-Marie de Rodat <derodat@adacore.com>2020-10-15 05:39:12 -0400
commite4f503be5d8f4b6f985f91ffe8a42ed9663466b3 (patch)
tree011fa2253489e87e1adfe32feb96472a878e7f7d
parenta0a294d3eb78eac2932756a6de8372a8de947567 (diff)
downloadgcc-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.adb2
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