aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/check.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/fortran/check.c')
-rw-r--r--gcc/fortran/check.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/fortran/check.c b/gcc/fortran/check.c
index 0204961..370a3c8 100644
--- a/gcc/fortran/check.c
+++ b/gcc/fortran/check.c
@@ -1340,6 +1340,10 @@ gfc_check_all_any (gfc_expr *mask, gfc_expr *dim)
}
+/* Limited checking for ALLOCATED intrinsic. Additional checking
+ is performed in intrinsic.c(sort_actual), because ALLOCATED
+ has two mutually exclusive non-optional arguments. */
+
bool
gfc_check_allocated (gfc_expr *array)
{