Re: [Patch, Fortran] Add support for TS18508's CO_SUM/MAX/MIN (part 1/2)

[Paul Richard Thomas]

Dear Tobias,

OK for trunk with one slight quibble:

I would rather see

+  /* Generate the function call.  */
+  if (code->resolved_isym->id == GFC_ISYM_CO_MAX)
+    fndecl = gfor_fndecl_co_max;
+  else if (code->resolved_isym->id == GFC_ISYM_CO_MIN)
+    fndecl = gfor_fndecl_co_min;
+  else if (code->resolved_isym->id == GFC_ISYM_CO_SUM)
+   fndecl = gfor_fndecl_co_sum;
+  else
+   gcc_unreachable ();
+

but your version is obviously functionally OK.

Thanks for the patch

Paul