trans-types.c (gfc_get_nodesc_array_type): Don't vary types depending on debug info.

* fortran/trans-types.c (gfc_get_nodesc_array_type): Don't
vary types depending on debug info.

From-SVN: r141021

gcc/ChangeLog

 2008-10-10  Alexandre Oliva  <aoliva@redhat.com>
 
+	* fortran/trans-types.c (gfc_get_nodesc_array_type): Don't
+	vary types depending on debug info.
+
+2008-10-10  Alexandre Oliva  <aoliva@redhat.com>
+
 	* c-gimplify.c (c_genericize): Don't refer to DECL_ASSEMBLER_NAME
 	before ensuring it's already computed.
 

gcc/fortran/trans-types.c

@@ -1415,10 +1415,10 @@ gfc_get_nodesc_array_type (tree etype, gfc_array_spec * as, gfc_packed packed)
   mpz_clear (stride);
   mpz_clear (delta);
 
-  /* In debug info represent packed arrays as multi-dimensional
-     if they have rank > 1 and with proper bounds, instead of flat
-     arrays.  */
-  if (known_offset && write_symbols != NO_DEBUG)
+  /* Represent packed arrays as multi-dimensional if they have rank >
+     1 and with proper bounds, instead of flat arrays.  This makes for
+     better debug info.  */
+  if (known_offset)
     {
       tree gtype = etype, rtype, type_decl;