1  /* PR c/64423 */
       2  /* { dg-do compile } */
       3  /* { dg-options "-Wchar-subscripts" } */
       4  
       5  int a[100];
       6  
       7  int
       8  f (char c)
       9  {
      10    return a[c]		/* { dg-warning "11:array subscript has type .char." } */
      11            + a[c]	/* { dg-warning "14:array subscript has type .char." } */
      12              + a[c];	/* { dg-warning "16:array subscript has type .char." } */
      13  }