From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 6556 invoked by alias); 31 Jul 2013 19:52:14 -0000 Mailing-List: contact gcc-bugs-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Archive: List-Post: List-Help: Sender: gcc-bugs-owner@gcc.gnu.org Received: (qmail 6468 invoked by uid 48); 31 Jul 2013 19:52:10 -0000 From: "janus at gcc dot gnu.org" To: gcc-bugs@gcc.gnu.org Subject: [Bug fortran/57306] [OOP] [F08] ICE on valid with class pointer initialization Date: Wed, 31 Jul 2013 19:52:00 -0000 X-Bugzilla-Reason: CC X-Bugzilla-Type: changed X-Bugzilla-Watch-Reason: None X-Bugzilla-Product: gcc X-Bugzilla-Component: fortran X-Bugzilla-Version: 4.9.0 X-Bugzilla-Keywords: ice-on-valid-code X-Bugzilla-Severity: normal X-Bugzilla-Who: janus at gcc dot gnu.org X-Bugzilla-Status: ASSIGNED X-Bugzilla-Priority: P3 X-Bugzilla-Assigned-To: janus at gcc dot gnu.org X-Bugzilla-Target-Milestone: --- X-Bugzilla-Flags: X-Bugzilla-Changed-Fields: Message-ID: In-Reply-To: References: 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-07/txt/msg01575.txt.bz2 http://gcc.gnu.org/bugzilla/show_bug.cgi?id=57306 --- Comment #7 from janus at gcc dot gnu.org --- Here is a reduced version of the test case from http://gcc.gnu.org/ml/fortran/2013-07/msg00103.html, which for some reason still ICEs: type :: c end type c type(c), target :: x class(c), pointer :: px => x if (.not. associated(px)) call abort() end internal compiler error: in expand_expr_real_1, at expr.c:9361 end ^ 0x764cdd expand_expr_real_1(tree_node*, rtx_def*, machine_mode, expand_modifier, rtx_def**) /home/janus/gcc49/trunk/gcc/expr.c:9356 0x76b7b7 expand_expr /home/janus/gcc49/trunk/gcc/expr.h:444 0x76b7b7 expand_expr_addr_expr_1 /home/janus/gcc49/trunk/gcc/expr.c:7587 0x762a59 expand_expr_addr_expr /home/janus/gcc49/trunk/gcc/expr.c:7710 0x762a59 expand_expr_real_1(tree_node*, rtx_def*, machine_mode, expand_modifier, rtx_def**) /home/janus/gcc49/trunk/gcc/expr.c:10451 0xabcfca expand_expr /home/janus/gcc49/trunk/gcc/expr.h:444 0xabcfca output_constant /home/janus/gcc49/trunk/gcc/varasm.c:4665 0xabcfca output_constant(tree_node*, unsigned long, unsigned int) /home/janus/gcc49/trunk/gcc/varasm.c:4566 0xabdb4b output_constructor_regular_field /home/janus/gcc49/trunk/gcc/varasm.c:4912 0xabdb4b output_constructor /home/janus/gcc49/trunk/gcc/varasm.c:5191 0xac1981 assemble_variable(tree_node*, int, int, int) /home/janus/gcc49/trunk/gcc/varasm.c:2113 0xac2259 varpool_assemble_decl(varpool_node*) /home/janus/gcc49/trunk/gcc/varpool.c:347 0x6d9f12 output_in_order /home/janus/gcc49/trunk/gcc/cgraphunit.c:1788 0x6d9f12 compile() /home/janus/gcc49/trunk/gcc/cgraphunit.c:2024 0x6da184 finalize_compilation_unit() /home/janus/gcc49/trunk/gcc/cgraphunit.c:2106 0x82b04c write_global_declarations() /home/janus/gcc49/trunk/gcc/langhooks.c:322 0x5f82bf gfc_write_global_declarations /home/janus/gcc49/trunk/gcc/fortran/f95-lang.c:263