2010-10-06 Mikael Morin <mikael@gcc.gnu.org>
* resolve.c (add_dt_to_dt_list): Remove unneeded if.
From-SVN: r165035
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
returning.
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;
}