From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 18183 invoked by alias); 16 Nov 2007 09:50:43 -0000 Received: (qmail 18134 invoked by alias); 16 Nov 2007 09:50:35 -0000 Date: Fri, 16 Nov 2007 09:50:00 -0000 Message-ID: <20071116095035.18133.qmail@sourceware.org> X-Bugzilla-Reason: CC References: Subject: [Bug fortran/31608] wrong types in character array/scalar binop In-Reply-To: Reply-To: gcc-bugzilla@gcc.gnu.org To: gcc-bugs@gcc.gnu.org From: "rguenther at suse dot de" 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: 2007-11/txt/msg01472.txt.bz2 ------- Comment #62 from rguenther at suse dot de 2007-11-16 09:50 ------- Subject: Re: wrong types in character array/scalar binop On Fri, 16 Nov 2007, pault at gcc dot gnu dot org wrote: > ------- Comment #61 from pault at gcc dot gnu dot org 2007-11-16 09:23 ------- > Richard, > > I believe that this is the right outcome for achar_4? > > (*(char[0:][1:1] *) atmp.4.data)[S.5][1]{lb: 1 sz: 1} = > *(_gfortran_compare_string (D.529, &(*(char[0:][1:1] *) atmp.2.data)[S.5][1]{lb: 1 sz: 1}, > 1 > , &"a"[1]{lb: 1 sz: 1}) >= 0 && _gfortran_compare_string (D.541, > &(*(char[0:][1: > 1] *) atmp.3.data)[S.5][1]{lb: 1 sz: 1}, 1, &"z"[1]{lb: 1 sz: 1}) <= 0 ? > &char.6 > : &(*(char[0:][1:1] *) atmp.1.data)[S.5][1]{lb: 1 sz: 1}); Twisted, but yes, this looks ok if char.6 is plain 'char'. Richard. -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31608