diff options
Diffstat (limited to 'translate/grt/grt-rtis_utils.ads')
| -rw-r--r-- | translate/grt/grt-rtis_utils.ads | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/translate/grt/grt-rtis_utils.ads b/translate/grt/grt-rtis_utils.ads index 0cb6e3e81..10c1a0f28 100644 --- a/translate/grt/grt-rtis_utils.ads +++ b/translate/grt/grt-rtis_utils.ads @@ -69,6 +69,12 @@ package Grt.Rtis_Utils is -- Get the name of a physical unit. function Get_Physical_Unit_Name (Unit : Ghdl_Rti_Access) return Ghdl_C_String; + + -- Get the value of a physical unit. + function Get_Physical_Unit_Value (Unit : Ghdl_Rti_Access; + Type_Rti : Ghdl_Rti_Access) + return Ghdl_I64; + -- Disp a value. procedure Disp_Value (Stream : FILEs; Value : Value_Union; |