This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
regen/utf8_strings.pl: Add ability to get native charset
[perl5.git] / utf8_strings.h
CommitLineData
61dad979
KW
1/* -*- buffer-read-only: t -*-
2 * !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
3 * This file is built by regen/utf8_strings.pl from Unicode data.
4 * Any changes made here will be lost!
5 */
6
d10c72f2
KW
7
8#ifndef H_UTF8_STRINGS /* Guard against nested #includes */
9#define H_UTF8_STRINGS 1
10
61dad979 11/* This file contains #defines for various Unicode code points. The values
525b6419
KW
12 * the macros expand to are the native Unicode code point, or all or portions
13 * of the UTF-8 encoding for the code point. In the former case, the macro
14 * name has the suffix "_NATIVE"; otherwise, the suffix "_UTF8".
61dad979 15 *
525b6419
KW
16 * The macros that have the suffix "_UTF8" may have further suffixes, as
17 * follows:
18 * "_FIRST_BYTE" if the value is just the first byte of the UTF-8
19 * representation; the value will be a numeric constant.
20 * "_TAIL" if instead it represents all but the first byte. This, and
21 * with no additional suffix are both string constants */
61dad979
KW
22
23#define COMBINING_GRAVE_ACCENT_UTF8 "\xCC\x80" /* U+0300 */
24#define COMBINING_ACUTE_ACCENT_UTF8 "\xCC\x81" /* U+0301 */
25#define COMBINING_DIAERESIS_UTF8 "\xCC\x88" /* U+0308 */
76837d21 26
61dad979 27#define GREEK_SMALL_LETTER_IOTA_UTF8_FIRST_BYTE 0xCE /* U+03B9 */
76837d21
KW
28#define GREEK_SMALL_LETTER_IOTA_UTF8_TAIL "\xB9" /* U+03B9 */
29
61dad979 30#define GREEK_SMALL_LETTER_UPSILON_UTF8_FIRST_BYTE 0xCF /* U+03C5 */
76837d21
KW
31#define GREEK_SMALL_LETTER_UPSILON_UTF8_TAIL "\x85" /* U+03C5 */
32
61dad979
KW
33#define HANGUL_CHOSEONG_KIYEOK_UTF8 "\xE1\x84\x80" /* U+1100 */
34#define HANGUL_JUNGSEONG_FILLER_UTF8 "\xE1\x85\xA0" /* U+1160 */
35#define HANGUL_JONGSEONG_KIYEOK_UTF8 "\xE1\x86\xA8" /* U+11A8 */
36#define HYPHEN_UTF8 "\xE2\x80\x90" /* U+2010 */
37
525b6419
KW
38#define DELETE_NATIVE 0x007F /* U+007F */
39#define LATIN_SMALL_LETTER_SHARP_S_NATIVE 0x00DF /* U+00DF */
40#define LATIN_SMALL_LETTER_A_WITH_RING_ABOVE_NATIVE 0x00E5 /* U+00E5 */
41#define LATIN_CAPITAL_LETTER_A_WITH_RING_ABOVE_NATIVE 0x00C5 /* U+00C5 */
42#define LATIN_SMALL_LETTER_Y_WITH_DIAERESIS_NATIVE 0x00FF /* U+00FF */
43#define MICRO_SIGN_NATIVE 0x00B5 /* U+00B5 */
44#define NEXT_LINE_NATIVE 0x0085 /* U+0085 */
45
d10c72f2
KW
46#endif /* H_UTF8_STRINGS */
47
61dad979 48/* ex: set ro: */