This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran project.

Index Nav:	[Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav:	[Date Prev] [Date Next]	[Thread Prev] [Thread Next]
Other format:	[Raw text]

Re: [Fortran, Patch] PR36462 - fix INDEX/SCAN with KIND= and not BACK= argument

From: FX <fxcoudert at gmail dot com>
To: Tobias Burnus <burnus at net-b dot de>
Cc: gcc-patches <gcc-patches at gcc dot gnu dot org>, "'fortran at gcc dot gnu dot org'" <fortran at gcc dot gnu dot org>
Date: Thu, 12 Jun 2008 12:00:07 +0100
Subject: Re: [Fortran, Patch] PR36462 - fix INDEX/SCAN with KIND= and not BACK= argument
Dkim-signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=gamma; h=domainkey-signature:received:received:in-reply-to:references :mime-version:content-type:message-id:cc:content-transfer-encoding :from:subject:date:to:x-mailer; bh=WjcWn+jIOUx3qjasJrI1JUhNB9hexHAnH8EhKxRHrKg=; b=iXNdbR9UQm4MRv0JQkCiQ4NwQMe18xRezfnaymRoBrkC22zJB5WkvAXv1ODcQ7PqWe oaFP7Gu7p6Ee3zFtvG+PfeBispSC8EZKHCJx71KyL7ay3IxPmx9z+aA2463FPmINzGbh 1j9gja3FcceSd3qo3UC7drecNpgTqy0TMIq2w=
Domainkey-signature: a=rsa-sha1; c=nofws; d=gmail.com; s=gamma; h=in-reply-to:references:mime-version:content-type:message-id:cc :content-transfer-encoding:from:subject:date:to:x-mailer; b=D8TJ0ikuLXt4S8u3fq4n/fQpDgD8LiJTDCKouYUHHExvtCY594w3aJqzsiEpTukVCw 1ONpXspnwQvD58mvP7y4x+5H2ejA6GhzwHlk6LF76p01KwNoUp/oYkyNn2SxelFvf8fI hLRTZ8G3eisupc1/Osjn+TnTwGc5TnGVejdEU=
References: <4850F9A6.9080301@net-b.de>

Build and lightly tested. (I will do a full check-gfortran later.)
OK when the test succeeds?

Looks OK.

FX

2008-06-12 Tobias Burnus <burnus@net-b.de>
	PR fortran/36462
	* trans-intrinsic.c (gfc_conv_intrinsic_index_scan_verify):
	Fix passing of the BACK= argument.
2008-06-12 Tobias Burnus <burnus@net-b.de>
	PR fortran/36462
	* gfortran.dg/index_2.f90: New.


--
François-Xavier Coudert
http://www.homepages.ucl.ac.uk/~uccafco/

References:
- [Fortran, Patch] PR36462 - fix INDEX/SCAN with KIND= and not BACK= argument
  - From: Tobias Burnus

Index Nav:	[Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav:	[Date Prev] [Date Next]	[Thread Prev] [Thread Next]