[gcc r12-7738] d: Fix internal compiler error: in build_complex, at tree.c:2358

[gcc r12-7738] d: Fix internal compiler error: in build_complex, at tree.c:2358

[Iain Buclaw]

https://gcc.gnu.org/g:1dd51373a82408361068e130a84caa888ef0d2b3

commit r12-7738-g1dd51373a82408361068e130a84caa888ef0d2b3
Author: Iain Buclaw <ibuclaw@gdcproject.org>
Date:   Mon Mar 21 19:47:50 2022 +0100

    d: Fix internal compiler error: in build_complex, at tree.c:2358
    
    The conversion from the special _Complex enum to native complex used
    build_complex, however the input value isn't necessarily a literal.
    
            PR d/105004
    
    gcc/d/ChangeLog:
    
            * d-codegen.cc (build_struct_literal): Use complex_expr to build
            complex expressions from __c_complex types.
    
    gcc/testsuite/ChangeLog:
    
            * gdc.dg/pr105004.d: New test.

Diff:
---
 gcc/d/d-codegen.cc              |  2 +-
 gcc/testsuite/gdc.dg/pr105004.d | 14 ++++++++++++++
 2 files changed, 15 insertions(+), 1 deletion(-)

diff --git a/gcc/d/d-codegen.cc b/gcc/d/d-codegen.cc
index 3e54d3bffd0..3206edd17e8 100644
--- a/gcc/d/d-codegen.cc
+++ b/gcc/d/d-codegen.cc
@@ -1161,7 +1161,7 @@ build_struct_literal (tree type, vec <constructor_elt, va_gc> *init)
   if (COMPLEX_FLOAT_TYPE_P (type))
     {
       gcc_assert (vec_safe_length (init) == 2);
-      return build_complex (type, (*init)[0].value, (*init)[1].value);
+      return complex_expr (type, (*init)[0].value, (*init)[1].value);
     }
 
   vec <constructor_elt, va_gc> *ve = NULL;
diff --git a/gcc/testsuite/gdc.dg/pr105004.d b/gcc/testsuite/gdc.dg/pr105004.d
new file mode 100644
index 00000000000..60b3c3f635e
--- /dev/null
+++ b/gcc/testsuite/gdc.dg/pr105004.d
@@ -0,0 +1,14 @@
+// https://gcc.gnu.org/bugzilla/show_bug.cgi?id=105004
+// { dg-do compile }
+
+private struct _Complex(T)
+{
+    T re;
+    T im;
+}
+enum __c_complex_float  : _Complex!float;
+
+__c_complex_float pr105004(float re, float im)
+{
+    return typeof(return)(re, im);
+}