Skip to content

R
riscv-gcc-1
Commit 14ceeb32 by Steven G. Kargl Committed by Steven G. Kargl
Options

intrinsic.c (gfc_intrinsic_func_interface): Enable errors for generic functions… 

intrinsic.c (gfc_intrinsic_func_interface): Enable errors for generic functions whose simplification routine return FAILURE.

* intrinsic.c (gfc_intrinsic_func_interface): Enable errors for generic
  functions whose simplification routine return FAILURE.

From-SVN: r101160
parent 10553f10
Showing with 7 additions and 5 deletions
gcc/fortran/ChangeLog
2005-06-18 Steven G. Kargl <kargls@comcast.net>
* intrinsic.c (gfc_intrinsic_func_interface): Enable errors for generic
functions whose simplification routine return FAILURE.
2005-06-13 Geoffrey Keating <geoffk@apple.com>
* Make-lang.in (fortran.install-man): Doesn't depend on installdirs.
......
gcc/fortran/intrinsic.c
......@@ -3007,16 +3007,13 @@ got_specific:
expr->value.function.isym = specific;
gfc_intrinsic_symbol (expr->symtree->n.sym);
gfc_suppress_error = 0;
if (do_simplify (specific, expr) == FAILURE)
{
gfc_suppress_error = 0;
return MATCH_ERROR;
}
return MATCH_ERROR;
/* TODO: We should probably only allow elemental functions here. */
flag |= (expr->ts.type != BT_INTEGER && expr->ts.type != BT_CHARACTER);
gfc_suppress_error = 0;
if (pedantic && gfc_init_expr
&& flag && gfc_init_expr_extensions (specific))
{
......
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