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