diff options
author | Tristan Gingold <tgingold@free.fr> | 2022-08-07 07:10:49 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2022-08-07 10:00:11 +0200 |
commit | 5c8b50f69d70f4e2d0a9910a7914245d0796b758 (patch) | |
tree | 91959a573b77b22e0af7bc72f1eaa54a835abf24 /src/vhdl/translate/trans-chap5.adb | |
parent | 23b3cadc1c6b96928f3d0829f8b0c5b7337fcc9c (diff) | |
download | ghdl-5c8b50f69d70f4e2d0a9910a7914245d0796b758.tar.gz ghdl-5c8b50f69d70f4e2d0a9910a7914245d0796b758.tar.bz2 ghdl-5c8b50f69d70f4e2d0a9910a7914245d0796b758.zip |
vhdl: add support for default in interface subprogram. Fix #2163
Diffstat (limited to 'src/vhdl/translate/trans-chap5.adb')
-rw-r--r-- | src/vhdl/translate/trans-chap5.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/vhdl/translate/trans-chap5.adb b/src/vhdl/translate/trans-chap5.adb index e9b11f8eb..8ee426293 100644 --- a/src/vhdl/translate/trans-chap5.adb +++ b/src/vhdl/translate/trans-chap5.adb @@ -850,6 +850,9 @@ package body Trans.Chap5 is Set_Map_Env (Formal_Env); Chap2.Elab_Package_Instantiation_Declaration (Formal); Set_Map_Env (Actual_Env); + when Iir_Kinds_Interface_Subprogram_Declaration => + -- Expanded. + null; when others => Error_Kind ("elab_generic_map_aspect(open)", Formal); end case; |