From 075becc3eb59711a743f277d697b957e95b906d9 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Sat, 14 Aug 2021 21:10:17 +0200 Subject: trans-chap3: handle (ignore) use clauses in protected types. Fix #1833 --- src/vhdl/translate/trans-chap3.adb | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/vhdl/translate') diff --git a/src/vhdl/translate/trans-chap3.adb b/src/vhdl/translate/trans-chap3.adb index 2599a35bc..e782d2d11 100644 --- a/src/vhdl/translate/trans-chap3.adb +++ b/src/vhdl/translate/trans-chap3.adb @@ -1791,7 +1791,8 @@ package body Trans.Chap3 is if Get_Info (El) /= null then Chap2.Translate_Subprogram_Declaration (El); end if; - when Iir_Kind_Attribute_Specification => + when Iir_Kind_Attribute_Specification + | Iir_Kind_Use_Clause => null; when others => Error_Kind ("translate_protected_type_subprograms_spec", El); -- cgit v1.2.3