2014-05-08 Tobias Burnus <burnus@net-b.de>
+ * trans-intrinsic.c (conv_co_minmaxsum): Change condition style.
+
+2014-05-08 Tobias Burnus <burnus@net-b.de>
+
* check.c (check_co_minmaxsum, gfc_check_co_minmax,
gfc_check_co_sum): New.
* error.c (gfc_notify_std): Update -std=f2008ts.
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_assert (code->resolved_isym->id == GFC_ISYM_CO_SUM);
- fndecl = gfor_fndecl_co_sum;
- }
+ gcc_unreachable ();
if (code->resolved_isym->id == GFC_ISYM_CO_SUM)
fndecl = build_call_expr_loc (input_location, fndecl, 6, array, vec,