nichkara/lace
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

lace.text.utility: Cosmetics.

Browse Source
This commit is contained in:
Rod Kay
2022-08-11 12:30:34 +10:00
parent 7d1f3b8db0
commit 359377777e
2 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
1-base/lace/source/text/lace-text-utility.adb
View File

@@ -6,12 +6,12 @@ with
package body lace.Text.utility package body lace.Text.utility
is is
function Contains (Self : in Text.item; Pattern : in String) return Boolean function contains (Self : in Text.item; Pattern : in String) return Boolean
is is
use ada.Strings.fixed; use ada.Strings.fixed;
begin begin
return Index (+Self, Pattern) /= 0; return Index (+Self, Pattern) /= 0;
end Contains; end contains;

2
1-base/lace/source/text/lace-text-utility.ads
View File

@@ -3,7 +3,7 @@ package lace.Text.utility
-- Provides utility subprograms. -- Provides utility subprograms.
-- --
is is
function Contains (Self : in Text.item; Pattern : in String) return Boolean; function contains (Self : in Text.item; Pattern : in String) return Boolean;
function replace (Self : in Text.item; Pattern : in String; function replace (Self : in Text.item; Pattern : in String;