Commit 312ae8f4 by Steven G. Kargl Committed by Steven G. Kargl

re PR fortran/24005 (Ambiguous INTERFACE leads to seg fault)

PR fortran/24005
* interface.c (check_interface1): Fix NULL dereference.

From-SVN: r104544
parent 8451584a
2005-09-22 Steven G. Kargl <kargls@comcast.net>
PR fortran/24005
* interface.c (check_interface1): Fix NULL dereference.
2005-09-22 Erik Edelmann <erik.edelmann@iki.fi>
PR fortran/23843
......
......@@ -926,8 +926,7 @@ check_interface1 (gfc_interface * p, gfc_interface * q,
if (p->sym == q->sym)
continue; /* Duplicates OK here */
if (strcmp (p->sym->name, q->sym->name) == 0
&& strcmp (p->sym->module, q->sym->module) == 0)
if (p->sym->name == q->sym->name && p->sym->module == q->sym->module)
continue;
if (compare_interfaces (p->sym, q->sym, generic_flag))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment