diff options
Diffstat (limited to 'gcc/fortran/interface.c')
| -rw-r--r-- | gcc/fortran/interface.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/fortran/interface.c b/gcc/fortran/interface.c index 5a9b2da..e1564b2 100644 --- a/gcc/fortran/interface.c +++ b/gcc/fortran/interface.c @@ -964,12 +964,12 @@ check_interface0 (gfc_interface * p, const char *interface_name) here. */ static int -check_interface1 (gfc_interface * p, gfc_interface * q, +check_interface1 (gfc_interface * p, gfc_interface * q0, int generic_flag, const char *interface_name) { - + gfc_interface * q; for (; p; p = p->next) - for (; q; q = q->next) + for (q = q0; q; q = q->next) { if (p->sym == q->sym) continue; /* Duplicates OK here */ |