Skip to content

R
riscv-gcc-1
Commit 9c980a13 by Tobias Burnus Committed by Tobias Burnus
Options

trans-intrinsic.c (conv_co_minmaxsum): Change condition style. 

2014-05-08  Tobias Burnus  <burnus@net-b.de>

        * trans-intrinsic.c (conv_co_minmaxsum): Change condition style.

From-SVN: r210224
parent d62cf3df
Showing with 7 additions and 4 deletions
gcc/fortran/ChangeLog
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.
......
gcc/fortran/trans-intrinsic.c
......@@ -7605,11 +7605,10 @@ conv_co_minmaxsum (gfc_code *code)
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,
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment