[Bug fortran/58989] [Regression] internal compiler error when using reshape function
sgk at troutmask dot apl.washington.edu
gcc-bugzilla@gcc.gnu.org
Tue Nov 5 01:19:00 GMT 2013
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=58989
--- Comment #2 from Steve Kargl <sgk at troutmask dot apl.washington.edu> ---
On Mon, Nov 04, 2013 at 09:40:39PM +0000, kargl at gcc dot gnu.org wrote:
> http://gcc.gnu.org/bugzilla/show_bug.cgi?id=58989
>
> kargl at gcc dot gnu.org changed:
>
> What |Removed |Added
> ----------------------------------------------------------------------------
> Status|UNCONFIRMED |NEW
> Last reconfirmed| |2013-11-04
> CC| |kargl at gcc dot gnu.org
> Known to work| |4.2.5, 4.3.6, 4.4.7
> Summary|internal compiler error |[Regression] internal
> |when using reshape function |compiler error when using
> | |reshape function
> Ever confirmed|0 |1
> Known to fail| |4.5.4, 4.6.4, 4.7.4, 4.8.2,
> | |4.9.0
>
> --- Comment #1 from kargl at gcc dot gnu.org ---
> Confirmed.
>
This appears to fix the issue. I'm running the testsuite
now.
Index: check.c
===================================================================
--- check.c (revision 204372)
+++ check.c (working copy)
@@ -3277,7 +3277,7 @@ gfc_check_reshape (gfc_expr *source, gfc
"than %d elements", &shape->where, GFC_MAX_DIMENSIONS);
return false;
}
- else if (shape->expr_type == EXPR_ARRAY)
+ else if (shape->expr_type == EXPR_ARRAY && gfc_is_constant_expr (shape))
{
gfc_expr *e;
int i, extent;
More information about the Gcc-bugs
mailing list