From a2c0447aeb1e1b3fca1d84716a2a97a5f65d3c30 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Tue, 7 May 2019 18:45:33 +0200 Subject: vhdl: Add a warning for null range in discrete type declaration. For issue #810 --- src/vhdl/errorout.ads | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src/vhdl/errorout.ads') diff --git a/src/vhdl/errorout.ads b/src/vhdl/errorout.ads index 8da60ee15..6825b1c0d 100644 --- a/src/vhdl/errorout.ads +++ b/src/vhdl/errorout.ads @@ -362,9 +362,9 @@ private type Warnings_Setting is array (Msgid_Warnings) of Warning_Control_Type; Default_Warnings : constant Warnings_Setting := - (Warnid_Binding | Warnid_Library | Warnid_Shared - | Warnid_Pure | Warnid_Specs | Warnid_Hide - | Warnid_Port => (Enabled => True, Error => False), + (Warnid_Library | Warnid_Binding | Warnid_Port | Warnid_Shared + | Warnid_Runtime_Error | Warnid_Pure | Warnid_Specs + | Warnid_Hide => (Enabled => True, Error => False), others => (Enabled => False, Error => False)); -- Compute the column from Error_Record E. -- cgit v1.2.3