aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/expr.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/fortran/expr.c')
-rw-r--r--gcc/fortran/expr.c9
1 files changed, 0 insertions, 9 deletions
diff --git a/gcc/fortran/expr.c b/gcc/fortran/expr.c
index 1546dec..122ba38 100644
--- a/gcc/fortran/expr.c
+++ b/gcc/fortran/expr.c
@@ -1273,15 +1273,6 @@ check_inquiry (gfc_expr * e)
int i;
- /* These functions must have exactly one argument. */
- if (e->value.function.actual == NULL
- || e->value.function.actual->next != NULL)
- return FAILURE;
-
- if (e->value.function.name != NULL
- && e->value.function.name[0] != '\0')
- return FAILURE;
-
name = e->symtree->n.sym->name;
for (i = 0; inquiry_function[i]; i++)