diff options
author | Tristan Gingold <tgingold@free.fr> | 2016-09-26 20:40:24 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2016-09-27 02:27:51 +0200 |
commit | f44b3c78755e01a9bd7fd9b639a08711b7c52660 (patch) | |
tree | c3bd192c03ce9d5403288c330e21e8c7811a08a9 /src/vhdl/translate/trans-chap5.adb | |
parent | 080c7dd9329aa90d4d797f638bb34312487cd496 (diff) | |
download | ghdl-f44b3c78755e01a9bd7fd9b639a08711b7c52660.tar.gz ghdl-f44b3c78755e01a9bd7fd9b639a08711b7c52660.tar.bz2 ghdl-f44b3c78755e01a9bd7fd9b639a08711b7c52660.zip |
vhdl08: more support for interface subprograms.
Diffstat (limited to 'src/vhdl/translate/trans-chap5.adb')
-rw-r--r-- | src/vhdl/translate/trans-chap5.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/vhdl/translate/trans-chap5.adb b/src/vhdl/translate/trans-chap5.adb index cc5f349d0..c86f34602 100644 --- a/src/vhdl/translate/trans-chap5.adb +++ b/src/vhdl/translate/trans-chap5.adb @@ -802,7 +802,8 @@ package body Trans.Chap5 is (Actual_Info.Package_Instance_Body_Scope), Uninst_Info.Package_Body_Ptr_Type)); end; - when Iir_Kind_Association_Element_Type => + when Iir_Kind_Association_Element_Type + | Iir_Kind_Association_Element_Subprogram => null; when others => Error_Kind ("elab_generic_map_aspect(1)", Assoc); |