diff options
Diffstat (limited to 'src/grt/grt-vstrings.ads')
| -rw-r--r-- | src/grt/grt-vstrings.ads | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/grt/grt-vstrings.ads b/src/grt/grt-vstrings.ads index 94967bb0f..067b54c6b 100644 --- a/src/grt/grt-vstrings.ads +++ b/src/grt/grt-vstrings.ads @@ -34,6 +34,9 @@ package Grt.Vstrings is -- Deallocate all storage internally allocated. procedure Free (Vstr : in out Vstring); + -- Reset VSTR to an empty string. + procedure Reset (Vstr : in out Vstring); + -- Append a character. procedure Append (Vstr : in out Vstring; C : Character); @@ -53,6 +56,8 @@ package Grt.Vstrings is -- Display VSTR. procedure Put (Stream : FILEs; Vstr : Vstring); + -- Get VSTR as a C String. The NUL character must have been added. + function Get_C_String (Vstr : Vstring) return Ghdl_C_String; -- A Rstring is link a Vstring but characters can only be prepended. type Rstring is limited private; |