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: [patch, libgfortran] PR45710 Adjust format and padding for WRITE of NAMELIST group to internal file

From: Tobias Burnus <burnus at net-b dot de>
To: Jerry DeLisle <jvdelisle at frontier dot com>
Cc: gfortran <fortran at gcc dot gnu dot org>, gcc patches <gcc-patches at gcc dot gnu dot org>
Date: Wed, 22 Sep 2010 08:16:21 +0200
Subject: Re: [patch, libgfortran] PR45710 Adjust format and padding for WRITE of NAMELIST group to internal file
References: <4C9978A4.6010601@frontier.com>

Am 22.09.2010 05:31, schrieb Jerry DeLisle:

This patch pads the end of records with ' ' for internal character unit arrays. The patch is fairly obvious. Code borrowed from transfer.c.
Regression tested ob x86-64.
OK for trunk.

OK. Thanks for the patch!

I will also add a test case.

The trim in comparisons such as

if (trim(out(3)).ne." B= 2.0000000 ,") call abort

is not needed (except that the program takes a bit longer to compile/run); the trim() in comparisons will also be optimized away for -O<n>, n>0 by the FE. But as it does not harm, you can leave it.

Tobias

References:
- [patch, libgfortran] PR45710 Adjust format and padding for WRITE of NAMELIST group to internal file
  - From: Jerry DeLisle

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