This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug libfortran/34980] [4.3 Regression] Segfault in shape given a scalar
- From: "tkoenig at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 26 Jan 2008 19:36:11 -0000
- Subject: [Bug libfortran/34980] [4.3 Regression] Segfault in shape given a scalar
- References: <bug-34980-10743@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #4 from tkoenig at gcc dot gnu dot org 2008-01-26 19:36 -------
This is currently bootstrapping.
$ svn diff
Index: shape.m4
===================================================================
--- shape.m4 (revision 131874)
+++ shape.m4 (working copy)
@@ -49,6 +49,9 @@ shape_'rtype_kind` ('rtype` * const rest
stride = ret->dim[0].stride;
+ if (ret->dim[0].ubound < ret->dim[0].lbound)
+ return;
+
for (n = 0; n < GFC_DESCRIPTOR_RANK (array); n++)
{
ret->data[n * stride] =
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34980