gcc/testsuite/gcc.dg/utf32-3.c

   1 /* Contributed by Kris Van Hees <kris.van.hees@oracle.com> */
   2 /* Test concatenation of char32_t* string literals. */
   3 /* { dg-do run } */
   4 /* { dg-xfail-run-if "PR36470" { "avr-*-*" } { "*" } { "" } } */
   5 /* { dg-options "-std=gnu99 -Wall -Werror" } */
   6
   7 typedef __CHAR32_TYPE__ char32_t;
   8
   9 extern void abort (void);
  10
  11 char32_t        *s0 = U"a" U"b";
  12
  13 char32_t        *s1 = U"a" "b";
  14 char32_t        *s2 = "a" U"b";
  15 char32_t        *s3 = U"a" "\u2029";
  16 char32_t        *s4 = "\u2029" U"b";
  17 char32_t        *s5 = U"a" "\U00064321";
  18 char32_t        *s6 = "\U00064321" U"b";
  19
  20 #define A       0x00000061
  21 #define B       0x00000062
  22 #define X       0x00002029
  23 #define Y       0x00064321
  24
  25 int main ()
  26 {
  27     if (sizeof ((U"a" U"b")[0]) != sizeof (char32_t))
  28         abort ();
  29     if (sizeof ((U"a"  "b")[0]) != sizeof (char32_t))
  30         abort ();
  31     if (sizeof (( "a" U"b")[0]) != sizeof (char32_t))
  32         abort ();
  33
  34     if (s0[0] != A || s0[1] != B || s0[2] != 0x00000000)
  35         abort ();
  36
  37     if (s1[0] != A || s1[1] != B || s1[2] != 0x00000000)
  38         abort ();
  39     if (s2[0] != A || s2[1] != B || s2[2] != 0x00000000)
  40         abort ();
  41     if (s3[0] != A || s3[1] != X || s3[2] != 0x00000000)
  42         abort ();
  43     if (s4[0] != X || s4[1] != B || s4[2] != 0x00000000)
  44         abort ();
  45     if (s5[0] != A || s5[1] != Y || s5[2] != 0x00000000)
  46         abort ();
  47     if (s6[0] != Y || s6[1] != B || s6[2] != 0x00000000)
  48         abort ();
  49 }