diff options
Diffstat (limited to 'src/vhdl/iirs_utils.adb')
| -rw-r--r-- | src/vhdl/iirs_utils.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/iirs_utils.adb b/src/vhdl/iirs_utils.adb index a74e9380b..5a87de0b7 100644 --- a/src/vhdl/iirs_utils.adb +++ b/src/vhdl/iirs_utils.adb @@ -378,7 +378,7 @@ package body Iirs_Utils is case Get_Kind (Formal) is when Iir_Kind_Simple_Name => return Get_Named_Entity (Formal); - when Iir_Kinds_Interface_Object_Declaration => + when Iir_Kinds_Interface_Declaration => return Formal; when Iir_Kind_Slice_Name | Iir_Kind_Indexed_Name |