Mercurial > hg > CbC > CbC_gcc
comparison gcc/testsuite/gcc.dg/utf32-2.c @ 111:04ced10e8804
gcc 7
author | kono |
---|---|
date | Fri, 27 Oct 2017 22:46:09 +0900 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
68:561a7518be6b | 111:04ced10e8804 |
---|---|
1 /* Contributed by Kris Van Hees <kris.van.hees@oracle.com> */ | |
2 /* Test the support for char32_t* string constants. */ | |
3 /* { dg-do run } */ | |
4 /* { dg-options "-std=gnu99 -Wall -Werror" } */ | |
5 | |
6 typedef __CHAR32_TYPE__ char32_t; | |
7 | |
8 extern void abort (void); | |
9 | |
10 char32_t *s0 = U"ab"; | |
11 char32_t *s1 = U"a\u0024"; | |
12 char32_t *s2 = U"a\u2029"; | |
13 char32_t *s3 = U"a\U00064321"; | |
14 | |
15 #define A 0x00000061 | |
16 #define B 0x00000062 | |
17 #define D 0x00000024 | |
18 #define X 0x00002029 | |
19 #define Y 0x00064321 | |
20 | |
21 int main () | |
22 { | |
23 if (s0[0] != A || s0[1] != B || s0[2] != 0x00000000) | |
24 abort (); | |
25 if (s1[0] != A || s1[1] != D || s0[2] != 0x00000000) | |
26 abort (); | |
27 if (s2[0] != A || s2[1] != X || s0[2] != 0x00000000) | |
28 abort (); | |
29 if (s3[0] != A || s3[1] != Y || s3[2] != 0x00000000) | |
30 abort (); | |
31 } |