Hex_Digit |
No, I have not created some new Wide_String class - yet. Just a few string tools.
34 | subtype Hex_Digit is Natural range 0 .. 16#F#; |
---|
128 | procedure Append_All |
---|---|
129 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
130 | Search : in Wide_String; |
131 | New_Item : in Wide_String; |
132 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity); |
Searches for all occurences of text "Search" and Inserts text "Insert" after the found text but only when "Insert" is not allready there.
String to be changed
String we look for
String we want to insert
Search mapping
143 | procedure Append_All |
---|---|
144 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
145 | Search : in Wide_String; |
146 | New_Item : in Wide_String; |
147 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity; |
148 | Count : out Natural); |
Searches for all occurences of text "Search" and Inserts text "Insert" after the found text but only when "Insert" is not allready there.
String to be changed
String we look for
String we want to insert
Search mapping
Count of replaces done
158 | procedure Append_First |
---|---|
159 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
160 | Search : in Wide_String; |
161 | New_Item : in Wide_String; |
162 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity); |
Searches for first occurence of text "Search" and Inserts text "Insert" after the found text but only when "Insert" is not allready there.
String to be changed
String we look for
String we want to insert
Search mapping
173 | procedure Append_First |
---|---|
174 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
175 | Search : in Wide_String; |
176 | New_Item : in Wide_String; |
177 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity; |
178 | Found : out Boolean); |
Searches for first occurence of text "Search" and Inserts text "Insert" after the found text but only when "Insert" is not allready there.
String to be changed
String we look for
String we want to insert
Search mapping
Count of replaces done
188 | procedure Append_Last |
---|---|
189 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
190 | Search : in Wide_String; |
191 | New_Item : in Wide_String; |
192 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity); |
Searches for last occurence of text "Search" and Inserts text "Insert" after the found text but only when "Insert" is not allready there.
String to be changed
String we look for
String we want to insert
Search mapping
203 | procedure Append_Last |
---|---|
204 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
205 | Search : in Wide_String; |
206 | New_Item : in Wide_String; |
207 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity; |
208 | Found : out Boolean); |
Searches for last occurence of text "Search" and Inserts text "Insert" after the found text but only when "Insert" is not allready there.
String to be changed
String we look for
String we want to insert
Search mapping
Count of replaces done
43 | procedure Change_All |
---|---|
44 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
45 | Search : in Wide_String; |
46 | Replace : in Wide_String; |
47 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity); |
Replace all Search with Replace
String to be changed
String we look for
String we want to have
Search mapping
57 | procedure Change_All |
---|---|
58 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
59 | Search : in Wide_String; |
60 | Replace : in Wide_String; |
61 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity; |
62 | Count : out Natural); |
Replace all Search with Replace and Count how often it was done.
String to be changed
String we look for
String we want to have
Search mapping
Count of replaces done
71 | procedure Change_First |
---|---|
72 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
73 | Search : in Wide_String; |
74 | Replace : in Wide_String; |
75 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity); |
Replace all Search with Replace
String to be changed
String we look for
String we want to have
Search mapping
85 | procedure Change_First |
---|---|
86 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
87 | Search : in Wide_String; |
88 | Replace : in Wide_String; |
89 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity; |
90 | Found : out Boolean); |
Replace First Search with Replace and return success flag.
String to be changed
String we look for
String we want to have
Search mapping
Count of replaces done
99 | procedure Change_Last |
---|---|
100 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
101 | Search : in Wide_String; |
102 | Replace : in Wide_String; |
103 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity); |
Replace Last Search with Replace
: String we look for
: String to be changed
: String we want to have
: Search mapping
113 | procedure Change_Last |
---|---|
114 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
115 | Search : in Wide_String; |
116 | Replace : in Wide_String; |
117 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity; |
118 | Found : out Boolean); |
Replace Last Search with Replace and return success flag.
String to be changed
String we look for
String we want to have
Search mapping
Count of replaces done
216 | function Field_End |
---|---|
217 | (Source : in Wide_String; |
218 | Field_Separator : in Wide_Character; |
219 | Starting_At : Positive) |
220 | return Natural with |
221 | Pure_Function; |
Return the end-of-field position in Data after "Starting_Index", assuming that fields are separated by the Field_Separator. If there's no Field_Separator, return the end of the Data.
String to search in
Field seperator.
Start search at.
356 | function First_Word |
---|---|
357 | (Source : in Wide_String; |
358 | Delimiter : in Wide_Character := ' ') |
359 | return Wide_String with |
360 | Pure_Function; |
Extract the first word.
String to search
word delimiter. Default is space.
314 | function Hash (Key : Wide_String) return Natural with |
---|---|
315 | Pure_Function; |
Hash function for booch components.
String to calculate a hash value form
hash value
322 | function Hash (Key : Ada.Strings.Wide_Unbounded.Unbounded_Wide_String) return Natural with |
---|---|
323 | Pure_Function; |
Hash function for booch components.
String to calculate a hash value form
hash value
330 | function Hash (Key : Ada.Strings.Wide_Unbounded.Unbounded_Wide_String) return Ada.Containers.Hash_Type with |
---|---|
331 | Pure_Function; |
Hash function for Ada components.
String to calculate a hash value form
hash value
338 | function Hash (Key : Wide_String) return Ada.Containers.Hash_Type with |
---|---|
339 | Pure_Function; |
Hash function for Ada components.
String to calculate a hash value form
hash value
258 | procedure Insert_All |
---|---|
259 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
260 | Search : in Wide_String; |
261 | New_Item : in Wide_String; |
262 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity); |
Searches for all occurences of text "Search" and Inserts text "Insert" bevore when "Insert" is there.
Search mapping
String we want to insert
String we look for
String to be changed
272 | procedure Insert_All |
---|---|
273 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
274 | Search : in Wide_String; |
275 | New_Item : in Wide_String; |
276 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity; |
277 | Count : out Natural); |
Searches for all occurences of text "Search" and Inserts text "Insert" bevore when "Insert" is there.
String to be changed
String we look for
String we want to insert
Search mapping
Count of replaces done
230 | procedure Insert_First |
---|---|
231 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
232 | Search : in Wide_String; |
233 | New_Item : in Wide_String; |
234 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity); |
Searches for first occurence of text "Search" and Inserts text "Insert" bevore when "Insert" is there.
String to be changed
String we look for
String we want to insert
Search mapping
244 | procedure Insert_First |
---|---|
245 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
246 | Search : in Wide_String; |
247 | New_Item : in Wide_String; |
248 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity; |
249 | Found : out Boolean); |
Searches for first occurence of text "Search" and Inserts text "Insert" bevore when "Insert" is there.
String to be changed
String we look for
String we want to insert
Search mapping
Count of replaces done
286 | procedure Insert_Last |
---|---|
287 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
288 | Search : in Wide_String; |
289 | New_Item : in Wide_String; |
290 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity); |
Searches for last occurence of text "Search" and Inserts text "Insert" bevore when "Insert" is there.
String to be changed
String we look for
String we want to insert
Search mapping
300 | procedure Insert_Last |
---|---|
301 | (Source : in out Ada.Strings.Wide_Unbounded.Unbounded_Wide_String; |
302 | Search : in Wide_String; |
303 | New_Item : in Wide_String; |
304 | Mapping : in Ada.Strings.Wide_Maps.Wide_Character_Mapping := Ada.Strings.Wide_Maps.Identity; |
305 | Found : out Boolean); |
Searches for last occurence of text "Search" and Inserts text "Insert" bevore when "Insert" is there.
String to be changed
String we look for
String we want to insert
Search mapping
Count of replaces done
367 | function Last_Word |
---|---|
368 | (Source : in Wide_String; |
369 | Delimiter : in Wide_Character := ' ') |
370 | return Wide_String with |
371 | Pure_Function; |
Extract the last word.
String to search
word delimiter. Default is space.
346 | function Value (Image : Ada.Strings.Wide_Unbounded.Unbounded_Wide_String) return Integer with |
---|---|
347 | Pure_Function; |
convert Wide_String into Integer
String to to be shown as Integer
pased integer value