From: Aldy Hernandez Date: Tue, 5 Dec 2006 17:53:35 +0000 (+0000) Subject: Revert accidental change. X-Git-Tag: releases/gcc-4.3.0~8121 X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=d5733d10bddcda17c52683973bc01f289951383d;p=thirdparty%2Fgcc.git Revert accidental change. From-SVN: r119547 --- diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c index 8cbcac93dab2..e31ecbd5909e 100644 --- a/gcc/fortran/resolve.c +++ b/gcc/fortran/resolve.c @@ -5741,19 +5741,6 @@ resolve_fl_derived (gfc_symbol *sym) sym->ns->derived_types = dt_list; } - /* Add derived type to the derived type list. */ - for (dt_list = sym->ns->derived_types; dt_list; dt_list = dt_list->next) - if (sym == dt_list->derived) - break; - - if (dt_list == NULL) - { - dt_list = gfc_get_dt_list (); - dt_list->next = sym->ns->derived_types; - dt_list->derived = sym; - sym->ns->derived_types = dt_list; - } - return SUCCESS; }