2021-03-24  Bill Schmidt  <wschm...@linux.ibm.com>

gcc/
        * config/rs6000/rs6000-gen-builtins.c (write_bif_static_init): New
        function.
        (write_init_file): Call write_bif_static_init.
---
 gcc/config/rs6000/rs6000-gen-builtins.c | 104 ++++++++++++++++++++++++
 1 file changed, 104 insertions(+)

diff --git a/gcc/config/rs6000/rs6000-gen-builtins.c 
b/gcc/config/rs6000/rs6000-gen-builtins.c
index 7ef297d04f5..aeedb77faf5 100644
--- a/gcc/config/rs6000/rs6000-gen-builtins.c
+++ b/gcc/config/rs6000/rs6000-gen-builtins.c
@@ -2441,6 +2441,108 @@ write_header_file ()
   return 1;
 }
 
+/* Write the decl and initializer for rs6000_builtin_info_x[].  */
+static void
+write_bif_static_init ()
+{
+  const char *res[3];
+  fprintf (init_file, "bifdata rs6000_builtin_info_x[RS6000_BIF_MAX] =\n");
+  fprintf (init_file, "  {\n");
+  fprintf (init_file, "    { /* RS6000_BIF_NONE: */\n");
+  fprintf (init_file, "      \"\", ENB_ALWAYS, 0, CODE_FOR_nothing, 0,\n");
+  fprintf (init_file, "      0, {0, 0, 0}, {RES_NONE, RES_NONE, RES_NONE},\n");
+  fprintf (init_file, "      {0, 0, 0}, {0, 0, 0}, \"\", RS6000_BIF_NONE\n");
+  fprintf (init_file, "    },\n");
+  for (int i = 0; i <= curr_bif; i++)
+    {
+      bifdata *bifp = &bifs[bif_order[i]];
+      fprintf (init_file, "    { /* RS6000_BIF_%s: */\n", bifp->idname);
+      fprintf (init_file, "      /* bifname */\t\"%s\",\n",
+              bifp->proto.bifname);
+      fprintf (init_file, "      /* enable*/\t%s,\n",
+              enable_string[bifp->stanza]);
+      /* Type must be instantiated at run time.  */
+      fprintf (init_file, "      /* fntype */\t0,\n");
+      fprintf (init_file, "      /* icode */\tCODE_FOR_%s,\n",
+              bifp->patname);
+      fprintf (init_file, "      /* nargs */\t%d,\n",
+              bifp->proto.nargs);
+      fprintf (init_file, "      /* bifattrs */\t0");
+      if (bifp->attrs.isinit)
+       fprintf (init_file, " | bif_init_bit");
+      if (bifp->attrs.isset)
+       fprintf (init_file, " | bif_set_bit");
+      if (bifp->attrs.isextract)
+       fprintf (init_file, " | bif_extract_bit");
+      if (bifp->attrs.isnosoft)
+       fprintf (init_file, " | bif_nosoft_bit");
+      if (bifp->attrs.isldvec)
+       fprintf (init_file, " | bif_ldvec_bit");
+      if (bifp->attrs.isstvec)
+       fprintf (init_file, " | bif_stvec_bit");
+      if (bifp->attrs.isreve)
+       fprintf (init_file, " | bif_reve_bit");
+      if (bifp->attrs.ispred)
+       fprintf (init_file, " | bif_pred_bit");
+      if (bifp->attrs.ishtm)
+       fprintf (init_file, " | bif_htm_bit");
+      if (bifp->attrs.ishtmspr)
+       fprintf (init_file, " | bif_htmspr_bit");
+      if (bifp->attrs.ishtmcr)
+       fprintf (init_file, " | bif_htmcr_bit");
+      if (bifp->attrs.ismma)
+       fprintf (init_file, " | bif_mma_bit");
+      if (bifp->attrs.isquad)
+       fprintf (init_file, " | bif_quad_bit");
+      if (bifp->attrs.ispair)
+       fprintf (init_file, " | bif_pair_bit");
+      if (bifp->attrs.isno32bit)
+       fprintf (init_file, " | bif_no32bit_bit");
+      if (bifp->attrs.is32bit)
+       fprintf (init_file, " | bif_32bit_bit");
+      if (bifp->attrs.iscpu)
+       fprintf (init_file, " | bif_cpu_bit");
+      if (bifp->attrs.isldstmask)
+       fprintf (init_file, " | bif_ldstmask_bit");
+      if (bifp->attrs.islxvrse)
+       fprintf (init_file, " | bif_lxvrse_bit");
+      if (bifp->attrs.islxvrze)
+       fprintf (init_file, " | bif_lxvrze_bit");
+      if (bifp->attrs.isendian)
+       fprintf (init_file, " | bif_endian_bit");
+      fprintf (init_file, ",\n");
+      fprintf (init_file, "      /* restr_opnd */\t{%d, %d, %d},\n",
+              bifp->proto.restr_opnd[0], bifp->proto.restr_opnd[1],
+              bifp->proto.restr_opnd[2]);
+      for (int j = 0; j < 3; j++)
+       res[j] = (bifp->proto.restr_opnd[j] == 0 ? "RES_NONE"
+                 : (bifp->proto.restr[j] == RES_BITS ? "RES_BITS"
+                    : (bifp->proto.restr[j] == RES_RANGE ? "RES_RANGE"
+                       : (bifp->proto.restr[j] == RES_VALUES ? "RES_VALUES"
+                          : (bifp->proto.restr[j] == RES_VAR_RANGE
+                             ? "RES_VAR_RANGE" : "ERROR")))));
+      fprintf (init_file, "      /* restr */\t{%s, %s, %s},\n",
+              res[0], res[1], res[2]);
+      fprintf (init_file, "      /* restr_val1 */\t{%d, %d, %d},\n",
+              bifp->proto.restr_val1[0], bifp->proto.restr_val1[1],
+              bifp->proto.restr_val1[2]);
+      fprintf (init_file, "      /* restr_val2 */\t{%d, %d, %d},\n",
+              bifp->proto.restr_val2[0], bifp->proto.restr_val2[1],
+              bifp->proto.restr_val2[2]);
+      fprintf (init_file, "      /* attr_string */\t\"%s\",\n",
+              (bifp->kind == FNK_CONST ? "= const"
+               : (bifp->kind == FNK_PURE ? "= pure"
+                  : (bifp->kind == FNK_FPMATH ? "= fp, const"
+                     : ""))));
+      bool no_icode = !strcmp (bifp->patname, "nothing");
+      fprintf (init_file, "      /* assoc_bif */\tRS6000_BIF_%s%s\n",
+              bifp->attrs.ismma && no_icode ? bifp->idname : "NONE",
+              bifp->attrs.ismma && no_icode ? "_INTERNAL" : "");
+      fprintf (init_file, "    },\n");
+    }
+  fprintf (init_file, "  };\n\n");
+}
+
 /* Write code to initialize the built-in function table.  */
 static void
 write_init_bif_table ()
@@ -2608,6 +2710,8 @@ write_init_file ()
 
   fprintf (init_file, "tree rs6000_builtin_decls_x[RS6000_OVLD_MAX];\n\n");
 
+  write_bif_static_init ();
+
   rbt_inorder_callback (&fntype_rbt, fntype_rbt.rbt_root, write_fntype);
   fprintf (init_file, "\n");
 
-- 
2.27.0

Reply via email to