This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/58652] ICE with move_alloc and unlimited polymorphic
- From: "burnus at gcc dot gnu.org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: Tue, 15 Oct 2013 06:24:40 +0000
- Subject: [Bug fortran/58652] ICE with move_alloc and unlimited polymorphic
- Auto-submitted: auto-generated
- References: <bug-58652-4 at http dot gcc dot gnu dot org/bugzilla/>
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=58652
--- Comment #6 from Tobias Burnus <burnus at gcc dot gnu.org> ---
Patch for the issue in comment 1:
--- a/gcc/fortran/interface.c
+++ b/gcc/fortran/interface.c
@@ -1993,2 +1993,3 @@ compare_parameter (gfc_symbol *formal, gfc_expr *actual,
- if (!gfc_compare_derived_types (CLASS_DATA (actual)->ts.u.derived,
- CLASS_DATA (formal)->ts.u.derived))
+ if (!UNLIMITED_POLY (formal)
+ && !gfc_compare_derived_types (CLASS_DATA (actual)->ts.u.derived,
+ CLASS_DATA (formal)->ts.u.derived))