(3)
package Ada.Strings.Wide_Maps is
pragma Preelaborate(Wide_Maps);
(4)
-- Representation for a set of Wide_Character values:
type Wide_Character_Set is private;
(5)
Null_Set : constant Wide_Character_Set;
(6)
type Wide_Character_Range is
record
Low : Wide_Character;
High : Wide_Character;
end record;
-- Represents Wide_Character range Low..High
(7)
type Wide_Character_Ranges is array (Positive range <>) of Wide_Character_Range;
(8)
function To_Set (Ranges : in Wide_Character_Ranges) return Wide_Character_Set;
(9)
function To_Set (Span : in Wide_Character_Range) return Wide_Character_Set;
(10)
function To_Ranges (Set : in Wide_Character_Set) return Wide_Character_Ranges;
(11)
function "=" (Left, Right : in Wide_Character_Set) return Boolean;
(12)
function "not" (Right : in Wide_Character_Set) return Wide_Character_Set;
function "and" (Left, Right : in Wide_Character_Set) return Wide_Character_Set;
function "or" (Left, Right : in Wide_Character_Set) return Wide_Character_Set;
function "xor" (Left, Right : in Wide_Character_Set) return Wide_Character_Set;
function "-" (Left, Right : in Wide_Character_Set) return Wide_Character_Set;
(13)
function Is_In (Element : in Wide_Character;
Set : in Wide_Character_Set)
return Boolean;
(14)
function Is_Subset (Elements : in Wide_Character_Set;
Set : in Wide_Character_Set)
return Boolean;
(15)
function "<=" (Left : in Wide_Character_Set;
Right : in Wide_Character_Set)
return Boolean renames Is_Subset;
(16)
-- Alternative representation for a set of Wide_Character values:
subtype Wide_Character_Sequence is Wide_String;
(17)
function To_Set (Sequence : in Wide_Character_Sequence) return Wide_Character_Set;
(18)
function To_Set (Singleton : in Wide_Character) return Wide_Character_Set;
(19)
function To_Sequence (Set : in Wide_Character_Set) return Wide_Character_Sequence;
(20)
-- Representation for a Wide_Character to Wide_Character mapping:
type Wide_Character_Mapping is private;
(21)
function Value (Map : in Wide_Character_Mapping;
Element : in Wide_Character)
return Wide_Character;
(22)
Identity : constant Wide_Character_Mapping;
(23)
function To_Mapping (From, To : in Wide_Character_Sequence)
return Wide_Character_Mapping;
(24)
function To_Domain (Map : in Wide_Character_Mapping)
return Wide_Character_Sequence;
(25)
function To_Range (Map : in Wide_Character_Mapping)
return Wide_Character_Sequence;
(26)
type Wide_Character_Mapping_Function is
access function (From : in Wide_Character) return Wide_Character;
(27)
private
... -- not specified by the language
end Ada.Strings.Wide_Maps;
(46)
Character_Set : constant Wide_Maps.Wide_Character_Set;
--Contains each Wide_Character value WC such that Characters.Is_Character(WC) is True
-- Email comments, additions, corrections, gripes, kudos, etc. to: