From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 15474 invoked by alias); 21 Oct 2010 13:02:45 -0000 Received: (qmail 15444 invoked by uid 22791); 21 Oct 2010 13:02:38 -0000 X-SWARE-Spam-Status: No, hits=-2.4 required=5.0 tests=ALL_TRUSTED,AWL,BAYES_00,MISSING_MID X-Spam-Check-By: sourceware.org Received: from localhost (HELO gcc.gnu.org) (127.0.0.1) by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Thu, 21 Oct 2010 13:02:29 +0000 From: "tkoenig at gcc dot gnu.org" To: gcc-bugs@gcc.gnu.org Subject: [Bug fortran/46007] wrong code for SHAPE in a scalarized loop X-Bugzilla-Reason: CC X-Bugzilla-Type: changed X-Bugzilla-Watch-Reason: None X-Bugzilla-Product: gcc X-Bugzilla-Component: fortran X-Bugzilla-Keywords: wrong-code X-Bugzilla-Severity: normal X-Bugzilla-Who: tkoenig at gcc dot gnu.org X-Bugzilla-Status: ASSIGNED X-Bugzilla-Priority: P3 X-Bugzilla-Assigned-To: tkoenig at gcc dot gnu.org X-Bugzilla-Target-Milestone: --- X-Bugzilla-Changed-Fields: In-Reply-To: References: X-Bugzilla-URL: http://gcc.gnu.org/bugzilla/ Auto-Submitted: auto-generated Content-Type: text/plain; charset="UTF-8" MIME-Version: 1.0 Date: Thu, 21 Oct 2010 13:02:00 -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 X-SW-Source: 2010-10/txt/msg01781.txt.bz2 Message-ID: <20101021130200.OZxBnG-6RsATZ-yaRWdojIN84YcfGIn1BokCyvWdPpo@z> http://gcc.gnu.org/bugzilla/show_bug.cgi?id=46007 --- Comment #4 from Thomas Koenig 2010-10-21 13:02:15 UTC --- Author: tkoenig Date: Thu Oct 21 13:02:09 2010 New Revision: 165773 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=165773 Log: 2010-10-21 Thomas Koenig PR fortran/46007 Backport from trunk * m4/shape.m4 (shape_'rtype_kind`): Use variable for rank. Allocate return array if unallocated. * generated/shape_i4.c: Regenerated. * generated/shape_i8.c: Regenerated. * generated/shape_i16.c: Regenerated. 2010-10-21 Thomas Koenig PR fortran/46007 Backport from trunk * gfortran.dg/shape_5.f90: New test case. Added: branches/gcc-4_5-branch/gcc/testsuite/gfortran.dg/shape_5.f90 Modified: branches/gcc-4_5-branch/gcc/testsuite/ChangeLog branches/gcc-4_5-branch/libgfortran/ChangeLog branches/gcc-4_5-branch/libgfortran/generated/shape_i16.c branches/gcc-4_5-branch/libgfortran/generated/shape_i4.c branches/gcc-4_5-branch/libgfortran/generated/shape_i8.c branches/gcc-4_5-branch/libgfortran/m4/shape.m4