view gcc/testsuite/gcc.dg/lvalue-2.c @ 131:84e7813d76e9

gcc-8.2
author mir3636
date Thu, 25 Oct 2018 07:37:49 +0900
parents 04ced10e8804
children
line wrap: on
line source

/* Test diagnostic messages for invalid lvalues and non-modifiable
   lvalues.  */
/* Origin: Joseph Myers <jsm@polyomino.org.uk> */
/* { dg-do compile } */
/* { dg-options "" } */

int a, b;

void
f0 (void)
{
  (a+b) = 1; /* { dg-error "lvalue required as left operand of assignment" } */
  (a+b)++; /* { dg-error "lvalue required as increment operand" } */
  ++(a+b); /* { dg-error "lvalue required as increment operand" } */
  (a+b)--; /* { dg-error "lvalue required as decrement operand" } */
  --(a+b); /* { dg-error "lvalue required as decrement operand" } */
  &(a+b); /* { dg-error "lvalue required as unary '&' operand" } */
}

const int c;
const struct { int x; } d;
struct { const int x; } e;
const int *f;

void
f1 (void)
{
  c = 1; /* { dg-error "assignment of read-only variable 'c'" } */
  d.x = 1; /* { dg-error "assignment of member 'x' in read-only object" } */
  e.x = 1; /* { dg-error "assignment of read-only member 'x'" } */
  *f = 1; /* { dg-error "assignment of read-only location" } */
  c++; /* { dg-error "increment of read-only variable 'c'" } */
  d.x++; /* { dg-error "increment of member 'x' in read-only object" } */
  e.x++; /* { dg-error "increment of read-only member 'x'" } */
  (*f)++; /* { dg-error "increment of read-only location" } */
  ++c; /* { dg-error "increment of read-only variable 'c'" } */
  ++d.x; /* { dg-error "increment of member 'x' in read-only object" } */
  ++e.x; /* { dg-error "increment of read-only member 'x'" } */
  ++(*f); /* { dg-error "increment of read-only location" } */
  c--; /* { dg-error "decrement of read-only variable 'c'" } */
  d.x--; /* { dg-error "decrement of member 'x' in read-only object" } */
  e.x--; /* { dg-error "decrement of read-only member 'x'" } */
  (*f)--; /* { dg-error "decrement of read-only location" } */
  --c; /* { dg-error "decrement of read-only variable 'c'" } */
  --d.x; /* { dg-error "decrement of member 'x' in read-only object" } */
  --e.x; /* { dg-error "decrement of read-only member 'x'" } */
  --(*f); /* { dg-error "decrement of read-only location" } */
}