From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 18306 invoked by alias); 16 May 2008 21:13:47 -0000 Received: (qmail 18087 invoked by alias); 16 May 2008 21:12:58 -0000 Date: Fri, 16 May 2008 21:13:00 -0000 Message-ID: <20080516211258.18085.qmail@sourceware.org> X-Bugzilla-Reason: CC References: Subject: [Bug fortran/35756] incorrect WHERE for functions in ELSEWHERE and overlaps In-Reply-To: Reply-To: gcc-bugzilla@gcc.gnu.org To: gcc-bugs@gcc.gnu.org From: "pault at gcc dot gnu dot org" 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: 2008-05/txt/msg01260.txt.bz2 ------- Comment #3 from pault at gcc dot gnu dot org 2008-05-16 21:12 ------- Subject: Bug 35756 Author: pault Date: Fri May 16 21:12:04 2008 New Revision: 135443 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=135443 Log: 2008-05-16 Paul Thomas PR fortran/35756 PR fortran/35759 * trans-stmt.c (gfc_trans_where): Tighten up the dependency check for calling gfc_trans_where_3. PR fortran/35743 * trans-stmt.c (gfc_trans_where_2): Set the mask size to zero if it is calculated to be negative. PR fortran/35745 * trans-stmt.c (gfc_trans_where_3, gfc_trans_where_assign): Set ss->where for scalar right hand sides. * trans-array.c (gfc_add_loop_ss_code): If ss->where is set do not evaluate scalars outside the loop. Clean up whitespace. * trans.h : Add a bitfield 'where' to gfc_ss. 2008-05-16 Paul Thomas PR fortran/35756 PR fortran/35759 * gfortran.dg/where_1.f90: New test. PR fortran/35743 PR fortran/35745 * gfortran.dg/where_2.f90: New test. Added: trunk/gcc/testsuite/gfortran.dg/where_1.f90 trunk/gcc/testsuite/gfortran.dg/where_2.f90 Modified: trunk/gcc/fortran/ChangeLog trunk/gcc/fortran/trans-array.c trunk/gcc/fortran/trans-stmt.c trunk/gcc/fortran/trans.h trunk/gcc/testsuite/ChangeLog -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35756