diff options
Diffstat (limited to 'src/vhdl/translate/trans-chap2.adb')
| -rw-r--r-- | src/vhdl/translate/trans-chap2.adb | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/vhdl/translate/trans-chap2.adb b/src/vhdl/translate/trans-chap2.adb index 5cbf85e62..ac58068af 100644 --- a/src/vhdl/translate/trans-chap2.adb +++ b/src/vhdl/translate/trans-chap2.adb @@ -114,6 +114,8 @@ package body Trans.Chap2 is Mech := Pass_By_Address; end if; Info.Interface_Mechanism (Mode_Value) := Mech; + when Iir_Kind_Interface_Quantity_Declaration => + raise Internal_Error; end case; end Translate_Interface_Mechanism; |