diff options
Diffstat (limited to 'src/grt/grt-lib.ads')
| -rw-r--r-- | src/grt/grt-lib.ads | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/src/grt/grt-lib.ads b/src/grt/grt-lib.ads index f8e7f0a7a..0210057fa 100644 --- a/src/grt/grt-lib.ads +++ b/src/grt/grt-lib.ads @@ -69,6 +69,12 @@ package Grt.Lib is function Ghdl_I32_Exp (V : Ghdl_I32; E : Std_Integer) return Ghdl_I32; function Ghdl_I64_Exp (V : Ghdl_I64; E : Std_Integer) return Ghdl_I64; + function Ghdl_I32_Div (L, R : Ghdl_I32) return Ghdl_I32; + function Ghdl_I64_Div (L, R : Ghdl_I64) return Ghdl_I64; + + function Ghdl_I32_Mod (L, R : Ghdl_I32) return Ghdl_I32; + function Ghdl_I64_Mod (L, R : Ghdl_I64) return Ghdl_I64; + -- Called before allocation of large (complex) objects. procedure Ghdl_Check_Stack_Allocation (Size : Ghdl_Index_Type); @@ -141,6 +147,12 @@ private pragma Export (C, Ghdl_I64_Exp, "__ghdl_i64_exp"); pragma Export (C, Ghdl_Real_Exp, "__ghdl_real_exp"); + pragma Export (C, Ghdl_I32_Div, "__ghdl_i32_div"); + pragma Export (C, Ghdl_I64_Div, "__ghdl_i64_div"); + + pragma Export (C, Ghdl_I32_Mod, "__ghdl_i32_mod"); + pragma Export (C, Ghdl_I64_Mod, "__ghdl_i64_mod"); + pragma Export (C, Ghdl_Std_Ulogic_To_Boolean_Array, "__ghdl_std_ulogic_to_boolean_array"); |