]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
Properly parse invariant &MEM addresses in the GIMPLE FE
authorRichard Biener <rguenther@suse.de>
Wed, 6 Oct 2021 09:02:38 +0000 (11:02 +0200)
committerRichard Biener <rguenther@suse.de>
Thu, 7 Oct 2021 06:19:39 +0000 (08:19 +0200)
Currently the frontend rejects those addresses as not lvalues
because the C frontend doens't expect MEM_REF or TARGET_MEM_REF
to appear (but they would be valid lvalues there).  The following
fixes that by amending lvalue_p.

The change also makes the dumping of the source of the testcase
valid for the GIMPLE FE by not eliding the '&' when dumping
string literals.

2021-10-06  Richard Biener  <rguenther@suse.de>

gcc/c/
* c-typeck.c (lvalue_p): Also allow MEM_REF and TARGET_MEM_REF.

gcc/
* tree-pretty-print.c (dump_generic_node): Do not elide
printing '&' when dumping with -gimple.

gcc/testsuite/
* gcc.dg/gimplefe-47.c: New testcase.

gcc/c/c-typeck.c
gcc/testsuite/gcc.dg/gimplefe-47.c [new file with mode: 0644]
gcc/tree-pretty-print.c

index f9eb0e5176f05ef93bd10e6ef141dac04769e618..0aac978c02e0609d7d2f40072750c88775ec8fc1 100644 (file)
@@ -4968,6 +4968,10 @@ lvalue_p (const_tree ref)
     case STRING_CST:
       return true;
 
+    case MEM_REF:
+    case TARGET_MEM_REF:
+      /* MEM_REFs can appear from -fgimple parsing or folding, so allow them
+        here as well.  */
     case INDIRECT_REF:
     case ARRAY_REF:
     case VAR_DECL:
diff --git a/gcc/testsuite/gcc.dg/gimplefe-47.c b/gcc/testsuite/gcc.dg/gimplefe-47.c
new file mode 100644 (file)
index 0000000..3bbd34d
--- /dev/null
@@ -0,0 +1,27 @@
+/* { dg-do compile } */
+/* { dg-options "-fgimple" } */
+
+char * begfield (int tab, char * ptr, char * lim, int sword, int schar);
+
+int __GIMPLE (ssa)
+main ()
+{
+  char * lim;
+  char * s;
+  char * _1;
+
+  __BB(2):
+  _1 = begfield (58, ":ab", &__MEM <char[4]> ((void *)&":ab" + _Literal
+(void *) 3), 1, 1);
+  if (_1 != _Literal (char *) &__MEM <char[4]> ((void *)&":ab" + _Literal (void *) 2))
+    goto __BB3;
+  else
+    goto __BB4;
+
+  __BB(3):
+  __builtin_abort ();
+
+  __BB(4):
+  __builtin_exit (0);
+}
+
index 30a3945c37ccb7067c9fdc6918ef599c27952292..275dc7d8af737ab620dd576c7c77501c26ca8018 100644 (file)
@@ -2888,10 +2888,13 @@ dump_generic_node (pretty_printer *pp, tree node, int spc, dump_flags_t flags,
     case PREDECREMENT_EXPR:
     case PREINCREMENT_EXPR:
     case INDIRECT_REF:
-      if (TREE_CODE (node) == ADDR_EXPR
+      if (!(flags & TDF_GIMPLE)
+         && TREE_CODE (node) == ADDR_EXPR
          && (TREE_CODE (TREE_OPERAND (node, 0)) == STRING_CST
              || TREE_CODE (TREE_OPERAND (node, 0)) == FUNCTION_DECL))
-       ;       /* Do not output '&' for strings and function pointers.  */
+       /* Do not output '&' for strings and function pointers when not
+          dumping GIMPLE FE syntax.  */
+       ;
       else
        pp_string (pp, op_symbol (node));