From f960173971d17c338b034d84cb80a4bf437a292c Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Thu, 12 Jan 2017 21:04:34 +0100 Subject: Add 'Image and 'Value for i64. Fix #254 --- src/ghdldrv/ghdlrun.adb | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'src/ghdldrv') diff --git a/src/ghdldrv/ghdlrun.adb b/src/ghdldrv/ghdlrun.adb index 725c16e30..c9183433f 100644 --- a/src/ghdldrv/ghdlrun.adb +++ b/src/ghdldrv/ghdlrun.adb @@ -496,6 +496,8 @@ package body Ghdlrun is Grt.Images.Ghdl_Image_E32'Address); Def (Trans_Decls.Ghdl_Image_I32, Grt.Images.Ghdl_Image_I32'Address); + Def (Trans_Decls.Ghdl_Image_I64, + Grt.Images.Ghdl_Image_I64'Address); Def (Trans_Decls.Ghdl_Image_F64, Grt.Images.Ghdl_Image_F64'Address); Def (Trans_Decls.Ghdl_Image_P64, @@ -511,6 +513,8 @@ package body Ghdlrun is Grt.Values.Ghdl_Value_E32'Address); Def (Trans_Decls.Ghdl_Value_I32, Grt.Values.Ghdl_Value_I32'Address); + Def (Trans_Decls.Ghdl_Value_I64, + Grt.Values.Ghdl_Value_I64'Address); Def (Trans_Decls.Ghdl_Value_F64, Grt.Values.Ghdl_Value_F64'Address); Def (Trans_Decls.Ghdl_Value_P32, -- cgit v1.2.3