From 567bd34cd798eb636fd34ea755879d1cb29104a4 Mon Sep 17 00:00:00 2001 From: Ondrej Ille Date: Sun, 21 Mar 2021 10:32:39 +0100 Subject: Revert "src: Add -Wpsl-uncovered option to optionally warn about uncovered PSL sequences at the end of simulation." This reverts commit e20d4477f9b55f897d4f9008d6c94db8d8c3a54f. --- src/vhdl/translate/trans-chap9.adb | 20 +++++++++----------- 1 file changed, 9 insertions(+), 11 deletions(-) (limited to 'src/vhdl/translate') diff --git a/src/vhdl/translate/trans-chap9.adb b/src/vhdl/translate/trans-chap9.adb index 70ee8fa16..60b19d222 100644 --- a/src/vhdl/translate/trans-chap9.adb +++ b/src/vhdl/translate/trans-chap9.adb @@ -489,17 +489,15 @@ package body Trans.Chap9 is Ghdl_Location_Ptr_Node)); New_Procedure_Call (Assocs); - if Flags.Flag_Psl_Warn_Uncovered = True then - New_Else_Stmt (Blk); - - Start_Association (Assocs, Ghdl_Psl_Cover_Failed); - New_Association (Assocs, New_Obj_Value (Msg_Var)); - New_Association (Assocs, New_Lit (Get_Ortho_Literal - (Severity_Level_Warning))); - New_Association (Assocs, New_Address (New_Obj (Loc), - Ghdl_Location_Ptr_Node)); - New_Procedure_Call (Assocs); - end if; + New_Else_Stmt (Blk); + + Start_Association (Assocs, Ghdl_Psl_Cover_Failed); + New_Association (Assocs, New_Obj_Value (Msg_Var)); + New_Association (Assocs, New_Lit (Get_Ortho_Literal + (Severity_Level_Error))); + New_Association (Assocs, New_Address (New_Obj (Loc), + Ghdl_Location_Ptr_Node)); + New_Procedure_Call (Assocs); Finish_If_Stmt (Blk); -- cgit v1.2.3