diff options
Diffstat (limited to 'src/fmd.ads')
-rw-r--r-- | src/fmd.ads | 13 |
1 files changed, 10 insertions, 3 deletions
diff --git a/src/fmd.ads b/src/fmd.ads index fe720d5..1c64deb 100644 --- a/src/fmd.ads +++ b/src/fmd.ads @@ -118,15 +118,22 @@ private - procedure Escape + procedure Replace_All (Text : in out SU.Unbounded_String; Char : in Character; Sub : in String) with Pre => Ada.Strings.Fixed.Count (Sub, Ada.Strings.Maps.To_Set (Char)) = 0; - procedure Standard_Escapes - (Text : in out SU.Unbounded_String); + procedure Replace_All + (Text : in out SU.Unbounded_String; + Item : in String; + Sub : in String); + + + function Prep + (Text : in SU.Unbounded_String) + return SU.Unbounded_String; end FMD; |