Skip to main content

A.3 Character Handling

danger

This Reference Manual output has not been verified, and may contain omissions or errors. Report any problems on the tracking issue

1/3

This subclause presents the packages related to character processing: an empty declared pure package Characters and child packages Characters.Handling and Characters.Latin_1. The package Characters.Handling provides classification and conversion functions for Character data, and some simple functions for dealing with Wide_Character and Wide_Wide_Character data. The child package Characters.Latin_1 declares a set of constants initialized to values of type Character.

Extensions to Ada 83

1.a/3

This subclause is new to Ada 95.

Wording Changes from Ada 95

1.b/2

Included Wide_Wide_Character in this description; the individual changes are documented as extensions as needed.

A.3.1 The Packages Characters, Wide_Characters, and Wide_Wide_Characters

Static Semantics

1

The library package Characters has the following declaration:

2/5

package Ada.Characters with Pure is end Ada.Characters;

3/2

The library package Wide_Characters has the following declaration:

4/5

package Ada.Wide_Characters with Pure is end Ada.Wide_Characters;

5/2

The library package Wide_Wide_Characters has the following declaration:

6/5

package Ada.Wide_Wide_Characters with Pure is end Ada.Wide_Wide_Characters;

Implementation Advice

7/3

If an implementation chooses to provide implementation-defined operations on Wide_Character or Wide_String (such as collating and sorting, etc.) it should do so by providing child units of Wide_Characters. Similarly if it chooses to provide implementation-defined operations on Wide_Wide_Character or Wide_Wide_String it should do so by providing child units of Wide_Wide_Characters.

7.a/2
implementation advice

Implementation-defined operations on Wide_Character, Wide_String, Wide_Wide_Character, and Wide_Wide_String should be child units of Wide_Characters or Wide_Wide_Characters.

Extensions to Ada 95

7.b/2

The packages Wide_Characters and Wide_Wide_Characters are new.

A.3.2 The Package Characters.Handling

Static Semantics

1

The library package Characters.Handling has the following declaration:

2/5

with Ada.Characters.Conversions; package Ada.Characters.Handling with Pure is 3 --Character classification functions 4/5

function Is_Control (Item : in Character) return Boolean; function Is_Graphic (Item : in Character) return Boolean; function Is_Letter (Item : in Character) return Boolean; function Is_Lower (Item : in Character) return Boolean; function Is_Upper (Item : in Character) return Boolean; function Is_Basic (Item : in Character) return Boolean; function Is_Digit (Item : in Character) return Boolean; function Is_Decimal_Digit (Item : in Character) return Boolean renames Is_Digit; function Is_Hexadecimal_Digit (Item : in Character) return Boolean; function Is_Alphanumeric (Item : in Character) return Boolean; function Is_Special (Item : in Character) return Boolean; function Is_Line_Terminator (Item : in Character) return Boolean; function Is_Mark (Item : in Character) return Boolean; function Is_Other_Format (Item : in Character) return Boolean; function Is_Punctuation_Connector (Item : in Character) return Boolean; function Is_Space (Item : in Character) return Boolean; function Is_NFKC (Item : in Character) return Boolean; 5 --Conversion functions for Character and String 6 function To_Lower (Item : in Character) return Character; function To_Upper (Item : in Character) return Character; function To_Basic (Item : in Character) return Character; 7 function To_Lower (Item : in String) return String; function To_Upper (Item : in String) return String; function To_Basic (Item : in String) return String; 8 --Classifications of and conversions between Character and ISO 646 9 subtype ISO_646 is Character range Character'Val(0) .. Character'Val(127); 10 function Is_ISO_646 (Item : in Character) return Boolean; function Is_ISO_646 (Item : in String) return Boolean; 11 function To_ISO_646 (Item : in Character; Substitute : in ISO_646 := ' ') return ISO_646; 12 function To_ISO_646 (Item : in String; Substitute : in ISO_646 := ' ') return String; 13/2

-- The functions Is_Character, Is_String, To_Character, To_String, To_Wide_Character, -- and To_Wide_String are obsolescent; see J.14. Paragraphs 14 through 18 were deleted. 19 end Ada.Characters.Handling;

19.a/2
discussion

The with_clause for Ada.Characters.Conversions is needed for the definition of the obsolescent functions (see J.14). It would be odd to put this clause into J.14 as it was not present in Ada 95, and with_clauses are semantically neutral to clients anyway.

20

In the description below for each function that returns a Boolean result, the effect is described in terms of the conditions under which the value True is returned. If these conditions are not met, then the function returns False.

21

Each of the following classification functions has a formal Character parameter, Item, and returns a Boolean result.

22

Is_Control
True if Item is a control character. A control character is a character whose position is in one of the ranges 0..31 or 127..159.
23

Is_Graphic
True if Item is a graphic character. A graphic character is a character whose position is in one of the ranges 32..126 or 160..255.
24

Is_Letter
True if Item is a letter. A letter is a character that is in one of the ranges 'A'..'Z' or 'a'..'z', or whose position is in one of the ranges 192..214, 216..246, or 248..255.
25

Is_Lower
True if Item is a lower-case letter. A lower-case letter is a character that is in the range 'a'..'z', or whose position is in one of the ranges 223..246 or 248..255.
26

Is_Upper
True if Item is an upper-case letter. An upper-case letter is a character that is in the range 'A'..'Z' or whose position is in one of the ranges 192..214 or 216.. 222.
27

Is_Basic
True if Item is a basic letter. A basic letter is a character that is in one of the ranges 'A'..'Z' and 'a'..'z', or that is one of the following: 'Æ', 'æ', 'Ð', 'ð', 'Þ', 'þ', or 'ß'.
28

Is_Digit
True if Item is a decimal digit. A decimal digit is a character in the range '0'..'9'.
29

Is_Decimal_Digit
A renaming of Is_Digit.
30

Is_Hexadecimal_Digit
True if Item is a hexadecimal digit. A hexadecimal digit is a character that is either a decimal digit or that is in one of the ranges 'A' .. 'F' or 'a' .. 'f'.
31

Is_Alphanumeric
True if Item is an alphanumeric character. An alphanumeric character is a character that is either a letter or a decimal digit.
32

Is_Special
True if Item is a special graphic character. A special graphic character is a graphic character that is not alphanumeric.
32.1/3

Is_Line_Terminator
True if Item is a character with position 10 .. 13 (Line_Feed, Line_Tabulation, Form_Feed, Carriage_Return) or 133 (Next_Line).
32.2/3

Is_Mark
Never True (no value of type Character has categories Mark, Non-Spacing or Mark, Spacing Combining).
32.3/3

Is_Other_Format
True if Item is a character with position 173 (Soft_Hyphen).
32.4/3

Is_Punctuation_Connector
True if Item is a character with position 95 ('_', known as Low_Line or Underscore).
32.5/3

Is_Space
True if Item is a character with position 32 (' ') or 160 (No_Break_Space).
32.6/5

Is_NFKC
True if Item can be present in a string normalized to Normalization Form KC (as defined by Clause 22 of ISO/IEC 10646:2020); this includes all characters except those with positions 160, 168, 170, 175, 178, 179, 180, 181, 184, 185, 186, 188, 189, and 190.
33

Each of the names To_Lower, To_Upper, and To_Basic refers to two functions: one that converts from Character to Character, and the other that converts from String to String. The result of each Character-to-Character function is described below, in terms of the conversion applied to Item, its formal Character parameter. The result of each String-to-String conversion is obtained by applying to each element of the function's String parameter the corresponding Character-to-Character conversion; the result is the null String if the value of the formal parameter is the null String. The lower bound of the result String is 1.

34

To_Lower
Returns the corresponding lower-case value for Item if Is_Upper(Item), and returns Item otherwise.
35

To_Upper
Returns the corresponding upper-case value for Item if Is_Lower(Item) and Item has an upper-case form, and returns Item otherwise. The lower case letters 'ß' and 'ÿ' do not have upper case forms.
36

To_Basic
Returns the letter corresponding to Item but with no diacritical mark, if Item is a letter but not a basic letter; returns Item otherwise.
37

The following set of functions test for membership in the ISO 646 character range, or convert between ISO 646 and Character.

38

Is_ISO_646
The function whose formal parameter, Item, is of type Character returns True if Item is in the subtype ISO_646.
39

Is_ISO_646
The function whose formal parameter, Item, is of type String returns True if Is_ISO_646(Item(I)) is True for each I in Item'Range.
40

To_ISO_646
The function whose first formal parameter, Item, is of type Character returns Item if Is_ISO_646(Item), and returns the Substitute ISO_646 character otherwise.
41

To_ISO_646
The function whose first formal parameter, Item, is of type String returns the String whose Range is 1..Item'Length and each of whose elements is given by To_ISO_646 of the corresponding element in Item.

Paragraphs 42 through 49 were deleted.

50

NOTE 1 A basic letter is a letter without a diacritical mark.

51

NOTE 2 Except for the hexadecimal digits, basic letters, and ISO_646 characters, the categories identified in the classification functions form a strict hierarchy:

52

— Control characters

53

— Graphic characters

54

— Alphanumeric characters

55

— Letters

56

— Upper-case letters

57

— Lower-case letters

58

— Decimal digits

59

— Special graphic characters

59.a
ramification

Thus each Character value is either a control character or a graphic character but not both; each graphic character is either an alphanumeric or special graphic but not both; each alphanumeric is either a letter or decimal digit but not both; each letter is either upper case or lower case but not both.

60/3

NOTE 3 There are certain characters which are defined to be lower case letters by ISO 10646 and are therefore allowed in identifiers, but are not considered lower case letters by Ada.Characters.Handling.

60.a/3
reason

This is to maintain runtime compatibility with the Ada 95 definitions of these functions. We don't list the exact characters involved because they're likely to change in future character set standards; the list for ISO 10646:2011 can be found in .

60.b/3
ramification

No version of Characters.Handling is intended to do portable (Ada-version independent) manipulation of Ada identifiers. The classification given by Wide_Characters.Handling will be correct for the current implementation for Ada 2012 identifiers, but it might not be correct for a different implementation or version of Ada.

Extensions to Ada 95

60.c/2

Characters.Handling is now Pure, so it can be used in pure units.

Incompatibilities With Ada 2005

60.d/3

Added additional classification routines so that Characters.Handling has all of the routines available in Wide_Characters.Handling. If Characters.Handling is referenced in a use_clause, and an entity E with a defining_identifier that is the same as one of the new functions is defined in a package that is also referenced in a use_clause, the entity E may no longer be use-visible, resulting in errors. This should be rare and is easily fixed if it does occur.

Wording Changes from Ada 95

60.e/2

The conversion functions are made obsolescent; a more complete set is available in Characters.Conversions — see A.3.4.

60.f/3

We no longer talk about localized character sets; these are a nonstandard mode, which is none of our business.

Wording Changes from Ada 2005

60.g/3
correction

Added a note to clarify that these functions don't have any relationship to the characters allowed in identifiers.

Incompatibilities With Ada 2012

60.h/5

Added an additional classification routine Is_NFKC. Therefore, a use clause conflict is possible; see the introduction of Annex A for more on this topic.

A.3.3 The Package Characters.Latin_1

1

The package Characters.Latin_1 declares constants for characters in ISO 8859-1.

1.a
reason

The constants for the ISO 646 characters could have been declared as renamings of objects declared in package ASCII, as opposed to explicit constants. The main reason for explicit constants was for consistency of style with the upper-half constants, and to avoid emphasizing the package ASCII.

Static Semantics

2

The library package Characters.Latin_1 has the following declaration:

3/5

package Ada.Characters.Latin_1 with Pure is 4 -- Control characters: 5 NUL : constant Character := Character'Val(0); SOH : constant Character := Character'Val(1); STX : constant Character := Character'Val(2); ETX : constant Character := Character'Val(3); EOT : constant Character := Character'Val(4); ENQ : constant Character := Character'Val(5); ACK : constant Character := Character'Val(6); BEL : constant Character := Character'Val(7); BS : constant Character := Character'Val(8); HT : constant Character := Character'Val(9); LF : constant Character := Character'Val(10); VT : constant Character := Character'Val(11); FF : constant Character := Character'Val(12); CR : constant Character := Character'Val(13); SO : constant Character := Character'Val(14); SI : constant Character := Character'Val(15); 6 DLE : constant Character := Character'Val(16); DC1 : constant Character := Character'Val(17); DC2 : constant Character := Character'Val(18); DC3 : constant Character := Character'Val(19); DC4 : constant Character := Character'Val(20); NAK : constant Character := Character'Val(21); SYN : constant Character := Character'Val(22); ETB : constant Character := Character'Val(23); CAN : constant Character := Character'Val(24); EM : constant Character := Character'Val(25); SUB : constant Character := Character'Val(26); ESC : constant Character := Character'Val(27); FS : constant Character := Character'Val(28); GS : constant Character := Character'Val(29); RS : constant Character := Character'Val(30); US : constant Character := Character'Val(31); 7 -- ISO 646 graphic characters: 8 Space : constant Character := ' '; -- Character'Val(32) Exclamation : constant Character := '!'; -- Character'Val(33) Quotation : constant Character := '"'; -- Character'Val(34) Number_Sign : constant Character := '#'; -- Character'Val(35) Dollar_Sign : constant Character := '$'; -- Character'Val(36) Percent_Sign : constant Character := '%'; -- Character'Val(37) Ampersand : constant Character := '&'; -- Character'Val(38) Apostrophe : constant Character := '''; -- Character'Val(39) Left_Parenthesis : constant Character := '('; -- Character'Val(40) Right_Parenthesis : constant Character := ')'; -- Character'Val(41) Asterisk : constant Character := '*'; -- Character'Val(42) Plus_Sign : constant Character := '+'; -- Character'Val(43) Comma : constant Character := ','; -- Character'Val(44) Hyphen : constant Character := '-'; -- Character'Val(45) Minus_Sign : Character renames Hyphen; Full_Stop : constant Character := '.'; -- Character'Val(46) Solidus : constant Character := '/'; -- Character'Val(47) 9 -- Decimal digits '0' though '9' are at positions 48 through 57 10 Colon : constant Character := ':'; -- Character'Val(58) Semicolon : constant Character := ';'; -- Character'Val(59) Less_Than_Sign : constant Character := '<'; -- Character'Val(60) Equals_Sign : constant Character := '='; -- Character'Val(61) Greater_Than_Sign : constant Character := '>'; -- Character'Val(62) Question : constant Character := '?'; -- Character'Val(63) Commercial_At : constant Character := '@'; -- Character'Val(64) 11 -- Letters 'A' through 'Z' are at positions 65 through 90 12 Left_Square_Bracket : constant Character := '['; -- Character'Val(91) Reverse_Solidus : constant Character := ''; -- Character'Val(92) Right_Square_Bracket : constant Character := ']'; -- Character'Val(93) Circumflex : constant Character := '^'; -- Character'Val(94) Low_Line : constant Character := '_'; -- Character'Val(95) 13 Grave : constant Character := '`'; -- Character'Val(96) LC_A : constant Character := 'a'; -- Character'Val(97) LC_B : constant Character := 'b'; -- Character'Val(98) LC_C : constant Character := 'c'; -- Character'Val(99) LC_D : constant Character := 'd'; -- Character'Val(100) LC_E : constant Character := 'e'; -- Character'Val(101) LC_F : constant Character := 'f'; -- Character'Val(102) LC_G : constant Character := 'g'; -- Character'Val(103) LC_H : constant Character := 'h'; -- Character'Val(104) LC_I : constant Character := 'i'; -- Character'Val(105) LC_J : constant Character := 'j'; -- Character'Val(106) LC_K : constant Character := 'k'; -- Character'Val(107) LC_L : constant Character := 'l'; -- Character'Val(108) LC_M : constant Character := 'm'; -- Character'Val(109) LC_N : constant Character := 'n'; -- Character'Val(110) LC_O : constant Character := 'o'; -- Character'Val(111) 14 LC_P : constant Character := 'p'; -- Character'Val(112) LC_Q : constant Character := 'q'; -- Character'Val(113) LC_R : constant Character := 'r'; -- Character'Val(114) LC_S : constant Character := 's'; -- Character'Val(115) LC_T : constant Character := 't'; -- Character'Val(116) LC_U : constant Character := 'u'; -- Character'Val(117) LC_V : constant Character := 'v'; -- Character'Val(118) LC_W : constant Character := 'w'; -- Character'Val(119) LC_X : constant Character := 'x'; -- Character'Val(120) LC_Y : constant Character := 'y'; -- Character'Val(121) LC_Z : constant Character := 'z'; -- Character'Val(122) Left_Curly_Bracket : constant Character := '{'; -- Character'Val(123) Vertical_Line : constant Character := '|'; -- Character'Val(124) Right_Curly_Bracket : constant Character := '}'; -- Character'Val(125) Tilde : constant Character := '~'; -- Character'Val(126) DEL : constant Character := Character'Val(127); 15 -- ISO 6429 control characters: 16 IS4 : Character renames FS; IS3 : Character renames GS; IS2 : Character renames RS; IS1 : Character renames US; 17 Reserved_128 : constant Character := Character'Val(128); Reserved_129 : constant Character := Character'Val(129); BPH : constant Character := Character'Val(130); NBH : constant Character := Character'Val(131); Reserved_132 : constant Character := Character'Val(132); NEL : constant Character := Character'Val(133); SSA : constant Character := Character'Val(134); ESA : constant Character := Character'Val(135); HTS : constant Character := Character'Val(136); HTJ : constant Character := Character'Val(137); VTS : constant Character := Character'Val(138); PLD : constant Character := Character'Val(139); PLU : constant Character := Character'Val(140); RI : constant Character := Character'Val(141); SS2 : constant Character := Character'Val(142); SS3 : constant Character := Character'Val(143); 18 DCS : constant Character := Character'Val(144); PU1 : constant Character := Character'Val(145); PU2 : constant Character := Character'Val(146); STS : constant Character := Character'Val(147); CCH : constant Character := Character'Val(148); MW : constant Character := Character'Val(149); SPA : constant Character := Character'Val(150); EPA : constant Character := Character'Val(151); 19 SOS : constant Character := Character'Val(152); Reserved_153 : constant Character := Character'Val(153); SCI : constant Character := Character'Val(154); CSI : constant Character := Character'Val(155); ST : constant Character := Character'Val(156); OSC : constant Character := Character'Val(157); PM : constant Character := Character'Val(158); APC : constant Character := Character'Val(159); 20 -- Other graphic characters: 21/3

-- Character positions 160 (16#A0#) .. 175 (16#AF#): No_Break_Space : constant Character := ' '; --Character'Val(160) NBSP : Character renames No_Break_Space; Inverted_Exclamation : constant Character := '¡'; --Character'Val(161) Cent_Sign : constant Character := '¢'; --Character'Val(162) Pound_Sign : constant Character := '£'; --Character'Val(163) Currency_Sign : constant Character := '¤'; --Character'Val(164) Yen_Sign : constant Character := '¥'; --Character'Val(165) Broken_Bar : constant Character := '¦'; --Character'Val(166) Section_Sign : constant Character := '§'; --Character'Val(167) Diaeresis : constant Character := '¨'; --Character'Val(168) Copyright_Sign : constant Character := '©'; --Character'Val(169) Feminine_Ordinal_Indicator : constant Character := 'ª'; --Character'Val(170) Left_Angle_Quotation : constant Character := '«'; --Character'Val(171) Not_Sign : constant Character := '¬'; --Character'Val(172) Soft_Hyphen : constant Character := Character'Val(173); Registered_Trade_Mark_Sign : constant Character := '®'; --Character'Val(174) Macron : constant Character := '¯'; --Character'Val(175) 22 -- Character positions 176 (16#B0#) .. 191 (16#BF#): Degree_Sign : constant Character := '°'; --Character'Val(176) Ring_Above : Character renames Degree_Sign; Plus_Minus_Sign : constant Character := '±'; --Character'Val(177) Superscript_Two : constant Character := '²'; --Character'Val(178) Superscript_Three : constant Character := '³'; --Character'Val(179) Acute : constant Character := '´'; --Character'Val(180) Micro_Sign : constant Character := 'µ'; --Character'Val(181) Pilcrow_Sign : constant Character := '¶'; --Character'Val(182) Paragraph_Sign : Character renames Pilcrow_Sign; Middle_Dot : constant Character := '·'; --Character'Val(183) Cedilla : constant Character := '¸'; --Character'Val(184) Superscript_One : constant Character := '¹'; --Character'Val(185) Masculine_Ordinal_Indicator: constant Character := 'º'; --Character'Val(186) Right_Angle_Quotation : constant Character := '»'; --Character'Val(187) Fraction_One_Quarter : constant Character := '¼'; --Character'Val(188) Fraction_One_Half : constant Character := '½'; --Character'Val(189) Fraction_Three_Quarters : constant Character := '¾'; --Character'Val(190) Inverted_Question : constant Character := '¿'; --Character'Val(191) 23 -- Character positions 192 (16#C0#) .. 207 (16#CF#): UC_A_Grave : constant Character := 'À'; --Character'Val(192) UC_A_Acute : constant Character := 'Á'; --Character'Val(193) UC_A_Circumflex : constant Character := 'Â'; --Character'Val(194) UC_A_Tilde : constant Character := 'Ã'; --Character'Val(195) UC_A_Diaeresis : constant Character := 'Ä'; --Character'Val(196) UC_A_Ring : constant Character := 'Å'; --Character'Val(197) UC_AE_Diphthong : constant Character := 'Æ'; --Character'Val(198) UC_C_Cedilla : constant Character := 'Ç'; --Character'Val(199) UC_E_Grave : constant Character := 'È'; --Character'Val(200) UC_E_Acute : constant Character := 'É'; --Character'Val(201) UC_E_Circumflex : constant Character := 'Ê'; --Character'Val(202) UC_E_Diaeresis : constant Character := 'Ë'; --Character'Val(203) UC_I_Grave : constant Character := 'Ì'; --Character'Val(204) UC_I_Acute : constant Character := 'Í'; --Character'Val(205) UC_I_Circumflex : constant Character := 'Î'; --Character'Val(206) UC_I_Diaeresis : constant Character := 'Ï'; --Character'Val(207) 24 -- Character positions 208 (16#D0#) .. 223 (16#DF#): UC_Icelandic_Eth : constant Character := 'Ð'; --Character'Val(208) UC_N_Tilde : constant Character := 'Ñ'; --Character'Val(209) UC_O_Grave : constant Character := 'Ò'; --Character'Val(210) UC_O_Acute : constant Character := 'Ó'; --Character'Val(211) UC_O_Circumflex : constant Character := 'Ô'; --Character'Val(212) UC_O_Tilde : constant Character := 'Õ'; --Character'Val(213) UC_O_Diaeresis : constant Character := 'Ö'; --Character'Val(214) Multiplication_Sign : constant Character := '×'; --Character'Val(215) UC_O_Oblique_Stroke : constant Character := 'Ø'; --Character'Val(216) UC_U_Grave : constant Character := 'Ù'; --Character'Val(217) UC_U_Acute : constant Character := 'Ú'; --Character'Val(218) UC_U_Circumflex : constant Character := 'Û'; --Character'Val(219) UC_U_Diaeresis : constant Character := 'Ü'; --Character'Val(220) UC_Y_Acute : constant Character := 'Ý'; --Character'Val(221) UC_Icelandic_Thorn : constant Character := 'Þ'; --Character'Val(222) LC_German_Sharp_S : constant Character := 'ß'; --Character'Val(223) 25 -- Character positions 224 (16#E0#) .. 239 (16#EF#): LC_A_Grave : constant Character := 'à'; --Character'Val(224) LC_A_Acute : constant Character := 'á'; --Character'Val(225) LC_A_Circumflex : constant Character := 'â'; --Character'Val(226) LC_A_Tilde : constant Character := 'ã'; --Character'Val(227) LC_A_Diaeresis : constant Character := 'ä'; --Character'Val(228) LC_A_Ring : constant Character := 'å'; --Character'Val(229) LC_AE_Diphthong : constant Character := 'æ'; --Character'Val(230) LC_C_Cedilla : constant Character := 'ç'; --Character'Val(231) LC_E_Grave : constant Character := 'è'; --Character'Val(232) LC_E_Acute : constant Character := 'é'; --Character'Val(233) LC_E_Circumflex : constant Character := 'ê'; --Character'Val(234) LC_E_Diaeresis : constant Character := 'ë'; --Character'Val(235) LC_I_Grave : constant Character := 'ì'; --Character'Val(236) LC_I_Acute : constant Character := 'í'; --Character'Val(237) LC_I_Circumflex : constant Character := 'î'; --Character'Val(238) LC_I_Diaeresis : constant Character := 'ï'; --Character'Val(239) 26 -- Character positions 240 (16#F0#) .. 255 (16#FF#): LC_Icelandic_Eth : constant Character := 'ð'; --Character'Val(240) LC_N_Tilde : constant Character := 'ñ'; --Character'Val(241) LC_O_Grave : constant Character := 'ò'; --Character'Val(242) LC_O_Acute : constant Character := 'ó'; --Character'Val(243) LC_O_Circumflex : constant Character := 'ô'; --Character'Val(244) LC_O_Tilde : constant Character := 'õ'; --Character'Val(245) LC_O_Diaeresis : constant Character := 'ö'; --Character'Val(246) Division_Sign : constant Character := '÷'; --Character'Val(247) LC_O_Oblique_Stroke : constant Character := 'ø'; --Character'Val(248) LC_U_Grave : constant Character := 'ù'; --Character'Val(249) LC_U_Acute : constant Character := 'ú'; --Character'Val(250) LC_U_Circumflex : constant Character := 'û'; --Character'Val(251) LC_U_Diaeresis : constant Character := 'ü'; --Character'Val(252) LC_Y_Acute : constant Character := 'ý'; --Character'Val(253) LC_Icelandic_Thorn : constant Character := 'þ'; --Character'Val(254) LC_Y_Diaeresis : constant Character := 'ÿ'; --Character'Val(255) end Ada.Characters.Latin_1;

Implementation Permissions

27

An implementation may provide additional packages as children of Ada.Characters, to declare names for the symbols of the local character set or other character sets.

Wording Changes from Ada 2005

27.a/3
correction

Soft_Hyphen is not a graphic character, and thus a character literal for it is illegal. So we have to use the position value. This makes no semantic change to users of the constant.

A.3.4 The Package Characters.Conversions

Static Semantics

1/2

The library package Characters.Conversions has the following declaration:

2/5

package Ada.Characters.Conversions with Pure is 3/2 function Is_Character (Item : in Wide_Character) return Boolean; function Is_String (Item : in Wide_String) return Boolean; function Is_Character (Item : in Wide_Wide_Character) return Boolean; function Is_String (Item : in Wide_Wide_String) return Boolean; function Is_Wide_Character (Item : in Wide_Wide_Character) return Boolean; function Is_Wide_String (Item : in Wide_Wide_String) return Boolean; 4/2 function To_Wide_Character (Item : in Character) return Wide_Character; function To_Wide_String (Item : in String) return Wide_String; function To_Wide_Wide_Character (Item : in Character) return Wide_Wide_Character; function To_Wide_Wide_String (Item : in String) return Wide_Wide_String; function To_Wide_Wide_Character (Item : in Wide_Character) return Wide_Wide_Character; function To_Wide_Wide_String (Item : in Wide_String) return Wide_Wide_String; 5/2 function To_Character (Item : in Wide_Character; Substitute : in Character := ' ') return Character; function To_String (Item : in Wide_String; Substitute : in Character := ' ') return String; function To_Character (Item : in Wide_Wide_Character; Substitute : in Character := ' ') return Character; function To_String (Item : in Wide_Wide_String; Substitute : in Character := ' ') return String; function To_Wide_Character (Item : in Wide_Wide_Character; Substitute : in Wide_Character := ' ') return Wide_Character; function To_Wide_String (Item : in Wide_Wide_String; Substitute : in Wide_Character := ' ') return Wide_String; 6/2 end Ada.Characters.Conversions;

7/2

The functions in package Characters.Conversions test Wide_Wide_Character or Wide_Character values for membership in Wide_Character or Character, or convert between corresponding characters of Wide_Wide_Character, Wide_Character, and Character.

8/2

function Is_Character (Item : in Wide_Character) return Boolean;

9/2

Returns True if Wide_Character'Pos(Item) <= Character'Pos(Character'Last).

10/2

function Is_Character (Item : in Wide_Wide_Character) return Boolean;

11/2

Returns True if Wide_Wide_Character'Pos(Item) <= Character'Pos(Character'Last).

12/2

function Is_Wide_Character (Item : in Wide_Wide_Character) return Boolean;

13/2

Returns True if Wide_Wide_Character'Pos(Item) <= Wide_Character'Pos(Wide_Character'Last).

14/2

function Is_String (Item : in Wide_String) return Boolean; function Is_String (Item : in Wide_Wide_String) return Boolean;

15/2

Returns True if Is_Character(Item(I)) is True for each I in Item'Range.

16/2

function Is_Wide_String (Item : in Wide_Wide_String) return Boolean;

17/2

Returns True if Is_Wide_Character(Item(I)) is True for each I in Item'Range.

18/2

function To_Character (Item : in Wide_Character; Substitute : in Character := ' ') return Character; function To_Character (Item : in Wide_Wide_Character; Substitute : in Character := ' ') return Character;

19/2

Returns the Character corresponding to Item if Is_Character(Item), and returns the Substitute Character otherwise.

20/2

function To_Wide_Character (Item : in Character) return Wide_Character;

21/2

Returns the Wide_Character X such that Character'Pos(Item) = Wide_Character'Pos (X).

22/2

function To_Wide_Character (Item : in Wide_Wide_Character; Substitute : in Wide_Character := ' ') return Wide_Character;

23/2

Returns the Wide_Character corresponding to Item if Is_Wide_Character(Item), and returns the Substitute Wide_Character otherwise.

24/2

function To_Wide_Wide_Character (Item : in Character) return Wide_Wide_Character;

25/2

Returns the Wide_Wide_Character X such that Character'Pos(Item) = Wide_Wide_Character'Pos (X).

26/2

function To_Wide_Wide_Character (Item : in Wide_Character) return Wide_Wide_Character;

27/2

Returns the Wide_Wide_Character X such that Wide_Character'Pos(Item) = Wide_Wide_Character'Pos (X).

28/2

function To_String (Item : in Wide_String; Substitute : in Character := ' ') return String; function To_String (Item : in Wide_Wide_String; Substitute : in Character := ' ') return String;

29/2

Returns the String whose range is 1..Item'Length and each of whose elements is given by To_Character of the corresponding element in Item.

30/2

function To_Wide_String (Item : in String) return Wide_String;

31/2

Returns the Wide_String whose range is 1..Item'Length and each of whose elements is given by To_Wide_Character of the corresponding element in Item.

32/2

function To_Wide_String (Item : in Wide_Wide_String; Substitute : in Wide_Character := ' ') return Wide_String;

33/2

Returns the Wide_String whose range is 1..Item'Length and each of whose elements is given by To_Wide_Character of the corresponding element in Item with the given Substitute Wide_Character.

34/2

function To_Wide_Wide_String (Item : in String) return Wide_Wide_String; function To_Wide_Wide_String (Item : in Wide_String) return Wide_Wide_String;

35/2

Returns the Wide_Wide_String whose range is 1..Item'Length and each of whose elements is given by To_Wide_Wide_Character of the corresponding element in Item.

Extensions to Ada 95

35.a/2

The package Characters.Conversions is new, replacing functions previously found in Characters.Handling.

A.3.5 The Package Wide_Characters.Handling

1/3

The package Wide_Characters.Handling provides operations for classifying Wide_Characters and case folding for Wide_Characters.

Static Semantics

2/3

The library package Wide_Characters.Handling has the following declaration:

3/5

package Ada.Wide_Characters.Handling with Pure is 4/3

function Character_Set_Version return String; 5/3 function Is_Control (Item : Wide_Character) return Boolean; 6/3 function Is_Letter (Item : Wide_Character) return Boolean; 7/3 function Is_Lower (Item : Wide_Character) return Boolean; 8/3 function Is_Upper (Item : Wide_Character) return Boolean; 8.1/5

function Is_Basic (Item : Wide_Character) return Boolean; 9/3 function Is_Digit (Item : Wide_Character) return Boolean; 10/3 function Is_Decimal_Digit (Item : Wide_Character) return Boolean renames Is_Digit; 11/3 function Is_Hexadecimal_Digit (Item : Wide_Character) return Boolean; 12/3 function Is_Alphanumeric (Item : Wide_Character) return Boolean; 13/3 function Is_Special (Item : Wide_Character) return Boolean; 14/3 function Is_Line_Terminator (Item : Wide_Character) return Boolean; 15/3 function Is_Mark (Item : Wide_Character) return Boolean; 16/3 function Is_Other_Format (Item : Wide_Character) return Boolean; 17/3 function Is_Punctuation_Connector (Item : Wide_Character) return Boolean; 18/3 function Is_Space (Item : Wide_Character) return Boolean; 18.1/5

function Is_NFKC (Item : Wide_Character) return Boolean; 19/3 function Is_Graphic (Item : Wide_Character) return Boolean; 20/3 function To_Lower (Item : Wide_Character) return Wide_Character; function To_Upper (Item : Wide_Character) return Wide_Character; 20.1/5

function To_Basic (Item : Wide_Character) return Wide_Character; 21/3 function To_Lower (Item : Wide_String) return Wide_String; function To_Upper (Item : Wide_String) return Wide_String; 21.1/5

function To_Basic (Item : Wide_String) return Wide_String; 22/3 end Ada.Wide_Characters.Handling;

23/3

The subprograms defined in Wide_Characters.Handling are locale independent.

24/3

function Character_Set_Version return String;

25/3

Returns an implementation-defined identifier that identifies the version of the character set standard that is used for categorizing characters by the implementation.

26/3

function Is_Control (Item : Wide_Character) return Boolean;

27/3

Returns True if the Wide_Character designated by Item is categorized as other_control; otherwise returns False.

28/3

function Is_Letter (Item : Wide_Character) return Boolean;

29/3

Returns True if the Wide_Character designated by Item is categorized as letter_uppercase, letter_lowercase, letter_titlecase, letter_modifier, letter_other, or number_letter; otherwise returns False.

30/3

function Is_Lower (Item : Wide_Character) return Boolean;

31/3

Returns True if the Wide_Character designated by Item is categorized as letter_lowercase; otherwise returns False.

32/3

function Is_Upper (Item : Wide_Character) return Boolean;

33/3

Returns True if the Wide_Character designated by Item is categorized as letter_uppercase; otherwise returns False.

33.1/5

function Is_Basic (Item : Wide_Character) return Boolean;

33.2/5

Returns True if the Wide_Character designated by Item has no Decomposition Mapping in the code charts of ISO/IEC 10646:2020; otherwise returns False.

33.a/5
implementation note

Decomposition Mapping is defined in Clause 33 of ISO/IEC 10646:2020. Machine-readable (and normative!) versions of this can be found as Character Decomposition Mapping, described in file http://www.unicode.org/Public/UCD/latest/ucd/UnicodeData.txt, field 5 (which is the 6th item, Unicode counts from zero).

34/3

function Is_Digit (Item : Wide_Character) return Boolean;

35/3

Returns True if the Wide_Character designated by Item is categorized as number_decimal; otherwise returns False.

36/3

function Is_Hexadecimal_Digit (Item : Wide_Character) return Boolean;

37/3

Returns True if the Wide_Character designated by Item is categorized as number_decimal, or is in the range 'A' .. 'F' or 'a' .. 'f'; otherwise returns False.

38/3

function Is_Alphanumeric (Item : Wide_Character) return Boolean;

39/3

Returns True if the Wide_Character designated by Item is categorized as letter_uppercase, letter_lowercase, letter_titlecase, letter_modifier, letter_other, number_letter, or number_decimal; otherwise returns False.

40/3

function Is_Special (Item : Wide_Character) return Boolean;

41/3

Returns True if the Wide_Character designated by Item is categorized as graphic_character, but not categorized as letter_uppercase, letter_lowercase, letter_titlecase, letter_modifier, letter_other, number_letter, or number_decimal; otherwise returns False.

42/3

function Is_Line_Terminator (Item : Wide_Character) return Boolean;

43/3

Returns True if the Wide_Character designated by Item is categorized as separator_line or separator_paragraph, or if Item is a conventional line terminator character (Line_Feed, Line_Tabulation, Form_Feed, Carriage_Return, Next_Line); otherwise returns False.

44/3

function Is_Mark (Item : Wide_Character) return Boolean;

45/3

Returns True if the Wide_Character designated by Item is categorized as mark_non_spacing or mark_spacing_combining; otherwise returns False.

46/3

function Is_Other_Format (Item : Wide_Character) return Boolean;

47/3

Returns True if the Wide_Character designated by Item is categorized as other_format; otherwise returns False.

48/3

function Is_Punctuation_Connector (Item : Wide_Character) return Boolean;

49/3

Returns True if the Wide_Character designated by Item is categorized as punctuation_connector; otherwise returns False.

50/3

function Is_Space (Item : Wide_Character) return Boolean;

51/3

Returns True if the Wide_Character designated by Item is categorized as separator_space; otherwise returns False.

51.1/5

function Is_NFKC (Item : Wide_Character) return Boolean;

51.2/5

Returns True if the Wide_Character designated by Item can be present in a string normalized to Normalization Form KC (as defined by Clause 22 of ISO/IEC 10646:2020), otherwise returns False.

51.a/5
reason

Wide_Characters for which this function returns False are not allowed in identifiers (see 2.3) even if they are categorized as letters or digits.

51.b/5
implementation note

This function returns False if the Unicode property NFKC Quick Check (NFKC_QC in the files) has the value No. See the Implementation Notes in 2.3 for the source of this property.

51.c/5
discussion

A string for which Is_NFKC is true for every character may still not be in Normalization Form KC, as Is_NFKC returns true for characters that are dependent on characters around them as to whether they are removed by normalization. Ada does not provide a full normalization operation (it is complex and expensive).

52/3

function Is_Graphic (Item : Wide_Character) return Boolean;

53/3

Returns True if the Wide_Character designated by Item is categorized as graphic_character; otherwise returns False.

54/3

function To_Lower (Item : Wide_Character) return Wide_Character;

55/5

Returns the Simple Lowercase Mapping as defined by documents referenced in Clause 2 of ISO/IEC 10646:2020 of the Wide_Character designated by Item. If the Simple Lowercase Mapping does not exist for the Wide_Character designated by Item, then the value of Item is returned.

55.a/5
discussion

The “documents referenced” means Unicode, Chapter 4 (specifically, section 4.2 — Case). The case mappings come from Unicode as ISO/IEC 10646:2020 does not include complete case mappings. See the Implementation Notes in subclause 1.1.4 for machine-readable versions of both Uppercase and Lowercase mappings.

56/3

function To_Lower (Item : Wide_String) return Wide_String;

57/3

Returns the result of applying the To_Lower conversion to each Wide_Character element of the Wide_String designated by Item. The result is the null Wide_String if the value of the formal parameter is the null Wide_String. The lower bound of the result Wide_String is 1.

58/3

function To_Upper (Item : Wide_Character) return Wide_Character;

59/5

Returns the Simple Uppercase Mapping as defined by documents referenced in Clause 2 of ISO/IEC 10646:2020 of the Wide_Character designated by Item. If the Simple Uppercase Mapping does not exist for the Wide_Character designated by Item, then the value of Item is returned.

60/3

function To_Upper (Item : Wide_String) return Wide_String;

61/3

Returns the result of applying the To_Upper conversion to each Wide_Character element of the Wide_String designated by Item. The result is the null Wide_String if the value of the formal parameter is the null Wide_String. The lower bound of the result Wide_String is 1.

61.1/5

function To_Basic (Item : Wide_Character) return Wide_Character;

61.2/5

Returns the Wide_Character whose code point is given by the first value of its Decomposition Mapping in the code charts of ISO/IEC 10646:2020 if any; returns Item otherwise.

61.3/5

function To_Basic (Item : Wide_String) return Wide_String;

61.4/5

Returns the result of applying the To_Basic conversion to each Wide_Character element of the Wide_String designated by Item. The result is the null Wide_String if the value of the formal parameter is the null Wide_String. The lower bound of the result Wide_String is 1.

Implementation Advice

62/3

The string returned by Character_Set_Version should include either “10646:” or “Unicode”.

62.a.1/3
implementation advice

The string returned by Wide_Characters.Handling.Character_Set_Version should include either “10646:” or “Unicode”.

62.a/5
discussion

The intent is that the returned string include the year for 10646 (as in "10646:2020"), and the version number for Unicode (as in "Unicode 13.0"). We don't try to specify that further so we don't need to decide how to represent Corrigenda for 10646, nor which of these is preferred. (Giving a Unicode version is more accurate, as the case folding and mapping rules always come from a Unicode version [10646 just tells one to look at Unicode to get those], and the character classifications ought to be the same for equivalent versions, but we don't want to talk about non-ISO standards in an ISO standard.)

63/5

NOTE 1 The results returned by these functions can depend on which particular version of ISO/IEC 10646 is supported by the implementation (see 2.1).

64/5

NOTE 2 The case insensitive equality comparison routines provided in A.4.10 are also available for wide strings (see A.4.7).

Extensions to Ada 2005

64.a/3

The package Wide_Characters.Handling is new.

Incompatibilities With Ada 2012

64.b/5

Added additional classification routines Is_Basic and Is_NFKC, and additional conversion routine To_Basic. Therefore, a use clause conflict is possible; see the introduction of Annex A for more on this topic.

A.3.6 The Package Wide_Wide_Characters.Handling

1/3

The package Wide_Wide_Characters.Handling has the same contents as Wide_Characters.Handling except that each occurrence of Wide_Character is replaced by Wide_Wide_Character, and each occurrence of Wide_String is replaced by Wide_Wide_String.

Extensions to Ada 2005

1.a/3

The package Wide_Wide_Characters.Handling is new.