1 files changed, 2 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-canon.adb b/src/vhdl/vhdl-canon.adb
index fb3759991..8d0c08bc3 100644
--- a/src/vhdl/vhdl-canon.adb
+++ b/src/vhdl/vhdl-canon.adb
@@ -3516,6 +3516,8 @@ package body Vhdl.Canon is
          when Iir_Kind_Vmode_Declaration
            | Iir_Kind_Vprop_Declaration =>
             null;
+         when Iir_Kind_Foreign_Module =>
+            raise Internal_Error;
       end case;
    end Canonicalize;