1  /* PR preprocessor/103026 */
       2  /* { dg-do compile } */
       3  /* { dg-options "-Wbidi-chars=ucn,unpaired" } */
       4  /* Test nesting of bidi chars in various contexts.  */
       5  
       6  void
       7  g1 ()
       8  {
       9    const char *s1 = "a b c LRE\N{LEFT-TO-RIGHT EMBEDDING} 1 2 3 PDI\N{POP DIRECTIONAL ISOLATE} x y z";
      10  /* { dg-warning "unpaired" "" { target *-*-* } .-1 } */
      11    const char *s2 = "a b c RLE\N{RIGHT-TO-LEFT EMBEDDING} 1 2 3 PDI\N{POP DIRECTIONAL ISOLATE} x y z";
      12  /* { dg-warning "unpaired" "" { target *-*-* } .-1 } */
      13    const char *s3 = "a b c LRO\N{LEFT-TO-RIGHT OVERRIDE} 1 2 3 PDI\N{POP DIRECTIONAL ISOLATE} x y z";
      14  /* { dg-warning "unpaired" "" { target *-*-* } .-1 } */
      15    const char *s4 = "a b c RLO\N{RIGHT-TO-LEFT OVERRIDE} 1 2 3 PDI\N{POP DIRECTIONAL ISOLATE} x y z";
      16  /* { dg-warning "unpaired" "" { target *-*-* } .-1 } */
      17    const char *s5 = "a b c LRI\N{LEFT-TO-RIGHT ISOLATE} 1 2 3 PDF\N{POP DIRECTIONAL FORMATTING} x y z";
      18  /* { dg-warning "unpaired" "" { target *-*-* } .-1 } */
      19    const char *s6 = "a b c RLI\N{RIGHT-TO-LEFT ISOLATE} 1 2 3 PDF\N{POP DIRECTIONAL FORMATTING} x y z";
      20  /* { dg-warning "unpaired" "" { target *-*-* } .-1 } */
      21    const char *s7 = "a b c FSI\N{FIRST STRONG ISOLATE} 1 2 3 PDF\N{POP DIRECTIONAL FORMATTING} x y z";
      22  /* { dg-warning "unpaired" "" { target *-*-* } .-1 } */
      23  }
      24  
      25  int A\N{LEFT-TO-RIGHT EMBEDDING}B\N{POP DIRECTIONAL ISOLATE}C;
      26  /* { dg-warning "unpaired" "" { target *-*-* } .-1 } */
      27  int a\N{RIGHT-TO-LEFT EMBEDDING}B\N{POP DIRECTIONAL ISOLATE}c;
      28  /* { dg-warning "unpaired" "" { target *-*-* } .-1 } */