aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/translate/trans-chap7.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl/translate/trans-chap7.adb')
-rw-r--r--src/vhdl/translate/trans-chap7.adb4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/vhdl/translate/trans-chap7.adb b/src/vhdl/translate/trans-chap7.adb
index c226f52dd..4833564bd 100644
--- a/src/vhdl/translate/trans-chap7.adb
+++ b/src/vhdl/translate/trans-chap7.adb
@@ -2443,6 +2443,10 @@ package body Trans.Chap7 is
return Translate_To_String
(Ghdl_To_String_I32, Res_Type, Loc,
New_Convert_Ov (Left_Tree, Ghdl_I32_Type));
+ when Type_Mode_I64 =>
+ return Translate_To_String
+ (Ghdl_To_String_I64, Res_Type, Loc,
+ New_Convert_Ov (Left_Tree, Ghdl_I64_Type));
when others =>
raise Internal_Error;
end case;