diff options
author | Tristan Gingold <tgingold@free.fr> | 2016-08-31 20:24:41 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2016-09-01 06:36:52 +0200 |
commit | 4e6853861f3809d45424b6eb372ccd91ed76f0cb (patch) | |
tree | 68f1ea12f7aeca8c3174dbe9c2eb5225fe677db5 /src/vhdl/translate/trans-chap2.adb | |
parent | a7f63a8a08aeaef263c7d4a404d7d827cac89b9a (diff) | |
download | ghdl-4e6853861f3809d45424b6eb372ccd91ed76f0cb.tar.gz ghdl-4e6853861f3809d45424b6eb372ccd91ed76f0cb.tar.bz2 ghdl-4e6853861f3809d45424b6eb372ccd91ed76f0cb.zip |
vhdl08: parse and analyze interface types.
Diffstat (limited to 'src/vhdl/translate/trans-chap2.adb')
-rw-r--r-- | src/vhdl/translate/trans-chap2.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/vhdl/translate/trans-chap2.adb b/src/vhdl/translate/trans-chap2.adb index fe1ffc7e0..5ff3ee3c7 100644 --- a/src/vhdl/translate/trans-chap2.adb +++ b/src/vhdl/translate/trans-chap2.adb @@ -384,7 +384,8 @@ package body Trans.Chap2 is when Iir_Kinds_Composite_Type_Definition => -- At least for "=". return True; - when Iir_Kind_Incomplete_Type_Definition => + when Iir_Kind_Incomplete_Type_Definition + | Iir_Kind_Interface_Type_Definition => null; end case; when others => |