From 647546bd637e2d2b55dd1db00e277dff56ad36c1 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Fri, 3 Feb 2023 19:11:09 +0100 Subject: vhdl-sem_decls: fix a regression on subtype indication. Fix #2336 --- src/vhdl/vhdl-sem_decls.adb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/vhdl/vhdl-sem_decls.adb') diff --git a/src/vhdl/vhdl-sem_decls.adb b/src/vhdl/vhdl-sem_decls.adb index a84435fa9..32b56a690 100644 --- a/src/vhdl/vhdl-sem_decls.adb +++ b/src/vhdl/vhdl-sem_decls.adb @@ -852,7 +852,7 @@ package body Vhdl.Sem_Decls is return; end if; - if Is_Proper_Subtype_Indication (Ind) then + if not Is_Proper_Subtype_Indication (Ind) then if Get_Kind (Def) /= Iir_Kind_Protected_Type_Declaration and then Get_Kind (Def) /= Iir_Kind_Interface_Type_Definition then -- cgit v1.2.3