diff options
Diffstat (limited to 'gcc/fortran/resolve.c')
-rw-r--r-- | gcc/fortran/resolve.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c index 536b3c5..452a8d8 100644 --- a/gcc/fortran/resolve.c +++ b/gcc/fortran/resolve.c @@ -27,6 +27,7 @@ along with GCC; see the file COPYING3. If not see #include "bitmap.h" #include "arith.h" /* For gfc_compare_expr(). */ #include "dependency.h" +#include "data.h" /* Types used in equivalence statements. */ @@ -1359,7 +1360,7 @@ resolve_global_procedure (gfc_symbol *sym, locus *where, int sub) gsym = gfc_get_gsymbol (sym->name); if ((gsym->type != GSYM_UNKNOWN && gsym->type != type)) - global_used (gsym, where); + gfc_global_used (gsym, where); if (gsym->type == GSYM_UNKNOWN) { |