resolve.c (add_dt_to_dt_list): Remove unneeded if.
2010-10-06 Mikael Morin <mikael@gcc.gnu.org> * resolve.c (add_dt_to_dt_list): Remove unneeded if. From-SVN: r165035
This commit is contained in:
parent
99b41d521c
commit
f372a0c01a
|
@ -1,3 +1,7 @@
|
|||
2010-10-06 Mikael Morin <mikael@gcc.gnu.org>
|
||||
|
||||
* resolve.c (add_dt_to_dt_list): Remove unneeded if.
|
||||
|
||||
2010-10-06 Mikael Morin <mikael@gcc.gnu.org>
|
||||
|
||||
* resolve.c (check_typebound_baseobject): Free local expr before
|
||||
|
|
|
@ -11088,15 +11088,12 @@ add_dt_to_dt_list (gfc_symbol *derived)
|
|||
|
||||
for (dt_list = gfc_derived_types; dt_list; dt_list = dt_list->next)
|
||||
if (derived == dt_list->derived)
|
||||
break;
|
||||
return;
|
||||
|
||||
if (dt_list == NULL)
|
||||
{
|
||||
dt_list = gfc_get_dt_list ();
|
||||
dt_list->next = gfc_derived_types;
|
||||
dt_list->derived = derived;
|
||||
gfc_derived_types = dt_list;
|
||||
}
|
||||
dt_list = gfc_get_dt_list ();
|
||||
dt_list->next = gfc_derived_types;
|
||||
dt_list->derived = derived;
|
||||
gfc_derived_types = dt_list;
|
||||
}
|
||||
|
||||
|
||||
|
|
Loading…
Reference in New Issue