[Bug fortran/57338] New: ICE with assumed rank

[Bug fortran/57338] New: ICE with assumed rank

[vladimir.fuka at gmail dot com]

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

            Bug ID: 57338
           Summary: ICE with assumed rank
           Product: gcc
           Version: 4.8.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: vladimir.fuka at gmail dot com

This function produces ICE with gcc-4.8 from 20130509:

function avg(a)
  integer :: avg
  integer,intent(in) :: a(..)

  avg = sum(a)/size(a)
end function



gfortran -c ice9.f90 
ice9.f90: In function ‘avg’:
ice9.f90:5:0: internal compiler error: in conv_array_index_offset, at
fortran/trans-array.c:2913
   avg = sum(a)/size(a)
 ^
0x5e8f6b conv_array_index_offset
        ../../gcc-4.8-20130509/gcc/fortran/trans-array.c:2913
0x5e9304 gfc_conv_scalarized_array_ref
        ../../gcc-4.8-20130509/gcc/fortran/trans-array.c:3044
0x5e9c39 gfc_conv_array_ref(gfc_se*, gfc_array_ref*, gfc_symbol*, locus*)
        ../../gcc-4.8-20130509/gcc/fortran/trans-array.c:3172
0x60cd8f gfc_conv_variable
        ../../gcc-4.8-20130509/gcc/fortran/trans-expr.c:1809
0x609e5a gfc_conv_expr(gfc_se*, gfc_expr*)
        ../../gcc-4.8-20130509/gcc/fortran/trans-expr.c:6266
0x60c573 gfc_conv_expr_val(gfc_se*, gfc_expr*)
        ../../gcc-4.8-20130509/gcc/fortran/trans-expr.c:6311
0x61b266 gfc_conv_intrinsic_arith
        ../../gcc-4.8-20130509/gcc/fortran/trans-intrinsic.c:2747
0x61d6b7 gfc_conv_intrinsic_function(gfc_se*, gfc_expr*)
        ../../gcc-4.8-20130509/gcc/fortran/trans-intrinsic.c:6840
0x6098e2 gfc_conv_function_expr
        ../../gcc-4.8-20130509/gcc/fortran/trans-expr.c:5547
0x609dca gfc_conv_expr(gfc_se*, gfc_expr*)
        ../../gcc-4.8-20130509/gcc/fortran/trans-expr.c:6258
0x609f3a gfc_conv_expr_op
        ../../gcc-4.8-20130509/gcc/fortran/trans-expr.c:2476
0x609f3a gfc_conv_expr(gfc_se*, gfc_expr*)
        ../../gcc-4.8-20130509/gcc/fortran/trans-expr.c:6254
0x60f3a6 gfc_trans_assignment_1
        ../../gcc-4.8-20130509/gcc/fortran/trans-expr.c:7739
0x5e3975 trans_code
        ../../gcc-4.8-20130509/gcc/fortran/trans.c:1422
0x600c92 gfc_generate_function_code(gfc_namespace*)
        ../../gcc-4.8-20130509/gcc/fortran/trans-decl.c:5397
0x5a49d0 translate_all_program_units
        ../../gcc-4.8-20130509/gcc/fortran/parse.c:4474
0x5a49d0 gfc_parse_file()
        ../../gcc-4.8-20130509/gcc/fortran/parse.c:4688
0x5dfd15 gfc_be_parse_file
        ../../gcc-4.8-20130509/gcc/fortran/f95-lang.c:189
Please submit a full bug report,
with preprocessed source if appropriate.
Please include the complete backtrace with any bug report.
See <http://gcc.gnu.org/bugs.html> for instructions.
>From gcc-bugs-return-422642-listarch-gcc-bugs=gcc.gnu.org@gcc.gnu.org Mon May 20 13:43:24 2013
Return-Path: <gcc-bugs-return-422642-listarch-gcc-bugs=gcc.gnu.org@gcc.gnu.org>
Delivered-To: listarch-gcc-bugs@gcc.gnu.org
Received: (qmail 17218 invoked by alias); 20 May 2013 13:43:23 -0000
Mailing-List: contact gcc-bugs-help@gcc.gnu.org; run by ezmlm
Precedence: bulk
List-Id: <gcc-bugs.gcc.gnu.org>
List-Archive: <http://gcc.gnu.org/ml/gcc-bugs/>
List-Post: <mailto:gcc-bugs@gcc.gnu.org>
List-Help: <mailto:gcc-bugs-help@gcc.gnu.org>
Sender: gcc-bugs-owner@gcc.gnu.org
Delivered-To: mailing list gcc-bugs@gcc.gnu.org
Received: (qmail 17164 invoked by uid 48); 20 May 2013 13:43:18 -0000
From: "steven at gcc dot gnu.org" <gcc-bugzilla@gcc.gnu.org>
To: gcc-bugs@gcc.gnu.org
Subject: [Bug debug/56950] compare-debug failure for gcc.dg/pr41345.c with fschedule-insns
Date: Mon, 20 May 2013 13:43:00 -0000
X-Bugzilla-Reason: CC
X-Bugzilla-Type: changed
X-Bugzilla-Watch-Reason: None
X-Bugzilla-Product: gcc
X-Bugzilla-Component: debug
X-Bugzilla-Version: 4.9.0
X-Bugzilla-Keywords: build, wrong-debug
X-Bugzilla-Severity: normal
X-Bugzilla-Who: steven at gcc dot gnu.org
X-Bugzilla-Status: NEW
X-Bugzilla-Priority: P3
X-Bugzilla-Assigned-To: unassigned at gcc dot gnu.org
X-Bugzilla-Target-Milestone: ---
X-Bugzilla-Flags:
X-Bugzilla-Changed-Fields:
Message-ID: <bug-56950-4-UfhnFKoCtU@http.gcc.gnu.org/bugzilla/>
In-Reply-To: <bug-56950-4@http.gcc.gnu.org/bugzilla/>
References: <bug-56950-4@http.gcc.gnu.org/bugzilla/>
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: 7bit
X-Bugzilla-URL: http://gcc.gnu.org/bugzilla/
Auto-Submitted: auto-generated
MIME-Version: 1.0
X-SW-Source: 2013-05/txt/msg01315.txt.bz2
Content-length: 1208

http://gcc.gnu.org/bugzilla/show_bug.cgi?idV950

--- Comment #7 from Steven Bosscher <steven at gcc dot gnu.org> ---
Index: haifa-sched.c
==================================================================--- haifa-sched.c       (revision 199028)
+++ haifa-sched.c       (working copy)
@@ -7435,20 +7435,19 @@ find_fallthru_edge_from (basic_block pre
 static void
 sched_extend_bb (void)
 {
-  rtx insn;
-
   /* The following is done to keep current_sched_info->next_tail non null.  */
-  insn = BB_END (EXIT_BLOCK_PTR->prev_bb);
+  rtx end = BB_END (EXIT_BLOCK_PTR->prev_bb);
+  rtx insn = DEBUG_INSN_P (end) ? prev_nondebug_insn (end) : end;
   if (NEXT_INSN (insn) == 0
       || (!NOTE_P (insn)
          && !LABEL_P (insn)
          /* Don't emit a NOTE if it would end up before a BARRIER.  */
          && !BARRIER_P (NEXT_INSN (insn))))
     {
-      rtx note = emit_note_after (NOTE_INSN_DELETED, insn);
-      /* Make insn appear outside BB.  */
+      rtx note = emit_note_after (NOTE_INSN_DELETED, end);
+      /* Make note appear outside BB.  */
       set_block_for_insn (note, NULL);
-      BB_END (EXIT_BLOCK_PTR->prev_bb) = insn;
+      BB_END (EXIT_BLOCK_PTR->prev_bb) = end;
     }
 }

[Bug fortran/57338] ICE with assumed rank

[burnus at gcc dot gnu.org]

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

Tobias Burnus <burnus at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |ice-on-invalid-code
                 CC|                            |burnus at gcc dot gnu.org

--- Comment #1 from Tobias Burnus <burnus at gcc dot gnu.org> ---
I think that has been fixed by my patch for PR57035,
which I seemingly have never committed:
http://gcc.gnu.org/ml/fortran/2013-04/msg00206.html

[Bug fortran/57338] ICE with assumed rank

[burnus at gcc dot gnu.org]

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

Tobias Burnus <burnus at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2013-05-21
     Ever confirmed|0                           |1

--- Comment #2 from Tobias Burnus <burnus at gcc dot gnu.org> ---
Actually, the patch for PR57035 didn't help - it was called too late. New
patch: http://gcc.gnu.org/ml/fortran/2013-05/msg00068.html

[Bug fortran/57338] ICE with assumed rank

[burnus at gcc dot gnu.org]

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

--- Comment #4 from Tobias Burnus <burnus at gcc dot gnu.org> ---
FIXED on the trunk (4.9).

Thanks for the report!