diff options
Diffstat (limited to 'src/grt/grt-rtis_utils.ads')
| -rw-r--r-- | src/grt/grt-rtis_utils.ads | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/grt/grt-rtis_utils.ads b/src/grt/grt-rtis_utils.ads index 537f1bff8..e1ee7a9c5 100644 --- a/src/grt/grt-rtis_utils.ads +++ b/src/grt/grt-rtis_utils.ads @@ -77,6 +77,9 @@ package Grt.Rtis_Utils is El_Addr : out Address; El_Bounds : out Address); + -- Return True iff RTI is an unbounded type. + function Is_Unbounded (Rti : Ghdl_Rti_Access) return Boolean; + procedure Get_Value (Str : in out Vstring; Value : Value_Union; Type_Rti : Ghdl_Rti_Access); |