1
The package Characters.Latin_1 declares constants for characters in ISO 8859−1.
2
The library package Characters.Latin_1 has the following declaration:
3
package Ada.Characters.Latin_1 is pragma Pure(Latin_1);
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
−− 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;
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.