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-options "-std=gnu99 -Wall -Werror" } */
       5  
       6  typedef __CHAR32_TYPE__ char32_t;
       7  
       8  extern void abort (void);
       9  
      10  char32_t	*s0 = U"a" U"b";
      11  
      12  char32_t	*s1 = U"a" "b";
      13  char32_t	*s2 = "a" U"b";
      14  char32_t	*s3 = U"a" "\u2029";
      15  char32_t	*s4 = "\u2029" U"b";
      16  char32_t	*s5 = U"a" "\U00064321";
      17  char32_t	*s6 = "\U00064321" U"b";
      18  
      19  #define A	0x00000061
      20  #define B	0x00000062
      21  #define X	0x00002029
      22  #define Y	0x00064321
      23  
      24  int main ()
      25  {
      26      if (sizeof ((U"a" U"b")[0]) != sizeof (char32_t))
      27  	abort ();
      28      if (sizeof ((U"a"  "b")[0]) != sizeof (char32_t))
      29  	abort ();
      30      if (sizeof (( "a" U"b")[0]) != sizeof (char32_t))
      31  	abort ();
      32  
      33      if (s0[0] != A || s0[1] != B || s0[2] != 0x00000000)
      34  	abort ();
      35  
      36      if (s1[0] != A || s1[1] != B || s1[2] != 0x00000000)
      37  	abort ();
      38      if (s2[0] != A || s2[1] != B || s2[2] != 0x00000000)
      39  	abort ();
      40      if (s3[0] != A || s3[1] != X || s3[2] != 0x00000000)
      41  	abort ();
      42      if (s4[0] != X || s4[1] != B || s4[2] != 0x00000000)
      43  	abort ();
      44      if (s5[0] != A || s5[1] != Y || s5[2] != 0x00000000)
      45  	abort ();
      46      if (s6[0] != Y || s6[1] != B || s6[2] != 0x00000000)
      47  	abort ();
      48  }