------- Comment #1 from burnus at gcc dot gnu dot org  2008-07-14 17:28 -------
The I/O ICE is due to:
  trans-types.c:  gcc_assert (rank <= GFC_DTYPE_RANK_MASK);
where the maximal DTYPE rank is defined as:
  libgfortran.h:#define GFC_DTYPE_RANK_MASK 0x07

The other problem can be cured using:

Index: array.c
===================================================================
--- array.c     (Revision 137756)
+++ array.c     (Arbeitskopie)
@@ -437,7 +437,7 @@ gfc_match_array_spec (gfc_array_spec **a
          goto cleanup;
        }

-      if (as->rank > 7
+      if (as->rank >= 7
          && gfc_notify_std (GFC_STD_F2008, "Fortran 2008: Array "
                             "specification at %C with more than 7 dimensions")
             == FAILURE)


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36825

Reply via email to