]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
c++: build initializer_list<string> in a loop [PR105838]
authorJason Merrill <jason@redhat.com>
Tue, 6 Dec 2022 23:10:48 +0000 (18:10 -0500)
committerJason Merrill <jason@redhat.com>
Mon, 12 Jun 2023 08:56:27 +0000 (04:56 -0400)
I previously applied this change in r13-4565 but reverted it due to
PR108071.  That PR was then fixed by r13-4712, but I didn't re-apply this
change then because we weren't making the array static; since r14-1500 for
PR110070 we now make the initializer array static, so let's bring this back.

In situations where the maybe_init_list_as_range optimization isn't viable,
we can build an initializer_list<string> with a loop over a constant array
of string literals.

This is represented using a VEC_INIT_EXPR, which required adjusting a couple
of places that expected the initializer array to have the same type as the
target array and fixing build_vec_init not to undo our efforts.

PR c++/105838

gcc/cp/ChangeLog:

* call.cc (convert_like_internal) [ck_list]: Use
maybe_init_list_as_array.
* constexpr.cc (cxx_eval_vec_init_1): Init might have
a different type.
* tree.cc (build_vec_init_elt): Likewise.
* init.cc (build_vec_init): Handle from_array from a
TARGET_EXPR.  Retain TARGET_EXPR of a different type.

gcc/testsuite/ChangeLog:

* g++.dg/tree-ssa/initlist-opt5.C: New test.

gcc/cp/call.cc
gcc/cp/constexpr.cc
gcc/cp/init.cc
gcc/cp/tree.cc
gcc/testsuite/g++.dg/tree-ssa/initlist-opt5.C [new file with mode: 0644]

index 354773f00c6305874b1aaecf69e069edfbf34960..68cf878308e226fe4660cb8540ccb2fcf7745105 100644 (file)
@@ -8541,7 +8541,16 @@ convert_like_internal (conversion *convs, tree expr, tree fn, int argnum,
        unsigned len = CONSTRUCTOR_NELTS (expr);
        tree array;
 
-       if (len)
+       if (tree init = maybe_init_list_as_array (elttype, expr))
+         {
+           elttype = cp_build_qualified_type
+             (elttype, cp_type_quals (elttype) | TYPE_QUAL_CONST);
+           array = build_array_of_n_type (elttype, len);
+           array = build_vec_init_expr (array, init, complain);
+           array = get_target_expr (array);
+           array = cp_build_addr_expr (array, complain);
+         }
+       else if (len)
          {
            tree val; unsigned ix;
 
index 9122a5efa6511a5498a69a704357ea797b065f6a..432b3a275e8485a321ab6177f66bc2bfee0d5e1e 100644 (file)
@@ -5243,12 +5243,12 @@ cxx_eval_vec_init_1 (const constexpr_ctx *ctx, tree atype, tree init,
       else
        {
          /* Copying an element.  */
-         gcc_assert (same_type_ignoring_top_level_qualifiers_p
-                     (atype, TREE_TYPE (init)));
          eltinit = cp_build_array_ref (input_location, init, idx, complain);
          if (!lvalue_p (init))
            eltinit = move (eltinit);
-         eltinit = force_rvalue (eltinit, complain);
+         eltinit = (perform_implicit_conversion_flags
+                    (elttype, eltinit, complain,
+                     LOOKUP_IMPLICIT|LOOKUP_NO_NARROWING));
          eltinit = cxx_eval_constant_expression (&new_ctx, eltinit, lval,
                                                  non_constant_p, overflow_p);
        }
index 6ccda365b048f7f4594b6c2ec7a0433b1ca4494e..af6e30f511e142c7a594e742d128b2bf0aa8fb8d 100644 (file)
@@ -4475,7 +4475,9 @@ build_vec_init (tree base, tree maxindex, tree init,
   /* Look through the TARGET_EXPR around a compound literal.  */
   if (init && TREE_CODE (init) == TARGET_EXPR
       && TREE_CODE (TARGET_EXPR_INITIAL (init)) == CONSTRUCTOR
-      && from_array != 2)
+      && from_array != 2
+      && (same_type_ignoring_top_level_qualifiers_p
+         (TREE_TYPE (init), atype)))
     init = TARGET_EXPR_INITIAL (init);
 
   if (tree vi = get_vec_init_expr (init))
@@ -4601,7 +4603,14 @@ build_vec_init (tree base, tree maxindex, tree init,
     {
       if (lvalue_kind (init) & clk_rvalueref)
        xvalue = true;
-      base2 = decay_conversion (init, complain);
+      if (TREE_CODE (init) == TARGET_EXPR)
+       {
+         /* Avoid error in decay_conversion.  */
+         base2 = decay_conversion (TARGET_EXPR_SLOT (init), complain);
+         base2 = cp_build_compound_expr (init, base2, tf_none);
+       }
+      else
+       base2 = decay_conversion (init, complain);
       if (base2 == error_mark_node)
        return error_mark_node;
       itype = TREE_TYPE (base2);
index 4d5e3f53c5ef653eaba3aa0b970e37bf9effc1b9..751c9adeb627a30ba4115e86a6f71db9a9a6aa70 100644 (file)
@@ -785,8 +785,6 @@ build_vec_init_elt (tree type, tree init, tsubst_flags_t complain)
   releasing_vec argvec;
   if (init && !BRACE_ENCLOSED_INITIALIZER_P (init))
     {
-      gcc_assert (same_type_ignoring_top_level_qualifiers_p
-                 (type, TREE_TYPE (init)));
       tree init_type = strip_array_types (TREE_TYPE (init));
       tree dummy = build_dummy_object (init_type);
       if (!lvalue_p (init))
diff --git a/gcc/testsuite/g++.dg/tree-ssa/initlist-opt5.C b/gcc/testsuite/g++.dg/tree-ssa/initlist-opt5.C
new file mode 100644 (file)
index 0000000..fc928bb
--- /dev/null
@@ -0,0 +1,24 @@
+// PR c++/105838
+// { dg-additional-options -fdump-tree-gimple }
+// { dg-do compile { target c++11 } }
+
+// Check that we call the basic_string constructor once (and define it once).
+// { dg-final { scan-tree-dump-times {>::basic_string} 2 "gimple" } }
+
+#include <string>
+
+void g (const void *);
+
+void f (const char *p)
+{
+  std::initializer_list<std::string> lst = {
+  "aahing", "aaliis", "aarrgh", "abacas", "abacus", "abakas", "abamps", "abands", "abased", "abaser", "abases", "abasia",
+  "abated", "abater", "abates", "abatis", "abator", "abattu", "abayas", "abbacy", "abbess", "abbeys", "abbots", "abcees",
+  "abdabs", "abduce", "abduct", "abears", "abeigh", "abeles", "abelia", "abends", "abhors", "abided", "abider", "abides",
+  "abject", "abjure", "ablate", "ablaut", "ablaze", "ablest", "ablets", "abling", "ablins", "abloom", "ablush", "abmhos",
+  "aboard", "aboded", "abodes", "abohms", "abolla", "abomas", "aboral", "abords", "aborne", "aborts", "abound", "abouts",
+  "aboves", "abrade", "abraid", "abrash", "abrays", "abrazo", "abrege", "abrins", "abroad", "abrupt", "abseil", "absent",
+  };
+
+  g(&lst);
+}