diff options
Diffstat (limited to 'gcc/fortran/primary.cc')
| -rw-r--r-- | gcc/fortran/primary.cc | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/gcc/fortran/primary.cc b/gcc/fortran/primary.cc index ab49eac..86c16af 100644 --- a/gcc/fortran/primary.cc +++ b/gcc/fortran/primary.cc @@ -4039,12 +4039,11 @@ gfc_match_rvalue (gfc_expr **result) } /* Check here for the existence of at least one argument for the - iso_c_binding functions C_LOC, C_FUNLOC, and C_ASSOCIATED. The - argument(s) given will be checked in gfc_iso_c_func_interface, - during resolution of the function call. */ + iso_c_binding functions C_LOC, C_FUNLOC, and C_ASSOCIATED. */ if (sym->attr.is_iso_c == 1 && (sym->from_intmod == INTMOD_ISO_C_BINDING && (sym->intmod_sym_id == ISOCBINDING_LOC + || sym->intmod_sym_id == ISOCBINDING_F_C_STRING || sym->intmod_sym_id == ISOCBINDING_FUNLOC || sym->intmod_sym_id == ISOCBINDING_ASSOCIATED))) { |