summaryrefslogtreecommitdiff
path: root/src/fmd.ads
diff options
context:
space:
mode:
Diffstat (limited to 'src/fmd.ads')
-rw-r--r--src/fmd.ads13
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;