1  /* Test assignment to elements of a string literal is a warning, not
       2     an error.  PR 27676.  */
       3  /* { dg-do compile } */
       4  /* { dg-options "-O -pedantic-errors" } */
       5  
       6  void
       7  f (void)
       8  {
       9    "foo"[0] = 0; /* { dg-warning "assignment of read-only location" } */
      10    "foo"[0]++; /* { dg-warning "increment of read-only location" } */
      11    "foo"[0]--; /* { dg-warning "decrement of read-only location" } */
      12    ++"foo"[0]; /* { dg-warning "increment of read-only location" } */
      13    --"foo"[0]; /* { dg-warning "decrement of read-only location" } */
      14  }