From e4f503be5d8f4b6f985f91ffe8a42ed9663466b3 Mon Sep 17 00:00:00 2001 From: Piotr Trojanek Date: Wed, 24 Jun 2020 19:18:19 +0200 Subject: [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. --- gcc/ada/sem_util.adb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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 -- cgit v1.1