1 files changed, 48 insertions, 0 deletions
diff --git a/gcc/testsuite/gcc.dg/lvalue-2.c b/gcc/testsuite/gcc.dg/lvalue-2.c
new file mode 100644
index 000000000..7f9372f30
--- /dev/null
+++ b/gcc/testsuite/gcc.dg/lvalue-2.c
@@ -0,0 +1,48 @@
+/* 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" } */
+}