This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/58989] [Regression] internal compiler error when using reshape function
- From: "sgk at troutmask dot apl.washington.edu" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: Tue, 05 Nov 2013 01:17:34 +0000
- Subject: [Bug fortran/58989] [Regression] internal compiler error when using reshape function
- Auto-submitted: auto-generated
- References: <bug-58989-4 at http dot gcc dot gnu dot org/bugzilla/>
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;