From 6080383b327571d366d3ed69bcf3cd4257a20010 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Sun, 19 Jun 2022 16:19:57 +0200 Subject: vhdl-sem_lib: do not disable warnings for files in -c/-r --- src/vhdl/vhdl-sem_lib.adb | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/src/vhdl/vhdl-sem_lib.adb b/src/vhdl/vhdl-sem_lib.adb index c4e26ee70..56312701b 100644 --- a/src/vhdl/vhdl-sem_lib.adb +++ b/src/vhdl/vhdl-sem_lib.adb @@ -354,9 +354,13 @@ package body Vhdl.Sem_Lib is -- Disable all warnings. Warnings are emitted only when the unit -- is analyzed. Save_Warnings_Setting (Warnings); - Disable_All_Warnings; if Get_Date_State (Design_Unit) = Date_Disk then + -- The unit is not loaded, so load it. + -- But disable warnings as the unit has already been analyzed. + -- The unit can be in memory but not yet analyzed when -c/-r is + -- used. In that case, warnings shouldn't be disabled. + Disable_All_Warnings; Load_Parse_Design_Unit (Design_Unit, Loc); end if; -- cgit v1.2.3