Contents Index Search Previous Next
A.3.3 The Package Characters.Latin_1
1
The package Characters.Latin_1 declares constants
for characters in ISO 8859-1.
Static Semantics
2
The library package
Characters.Latin_1 has the following declaration:
3
package Ada.Characters.Latin_1 is
pragma Pure(Latin_1);
4
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;
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.
Contents Index Search Previous Next Legal