FreeChainXenon/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

re PR fortran/37472 (bad output on default-format write of double in common block with -m64)

Browse source 
2008-11-20  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR libfortran/37472
	* gfortran.dg/namelist_print_1.f: Update test.

From-SVN: r142080
This commit is contained in:
Jerry DeLisle 2008-11-21 04:35:17 +00:00
parent 0f4122ff3d
commit 941bcbde52
2 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gcc/testsuite/ChangeLog
View file

@ -1,3 +1,8 @@
2008-11-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libfortran/37472
* gfortran.dg/namelist_print_1.f: Update test.
2008-11-20 Andreas Krebbel <krebbel1@de.ibm.com>
* gcc.dg/sync-2.c: Add type cast to avoid folding.

2
gcc/testsuite/gfortran.dg/namelist_print_1.f
View file

@ -9,5 +9,5 @@
namelist /mynml/ x
x = 1
! ( dg-output "^" }
print mynml ! { dg-output "&MYNML(\n|\r\n|\r) X= 1.00000000 ,(\n|\r\n|\r) /(\n|\r\n|\r)" }
print mynml ! { dg-output "&MYNML(\n|\r\n|\r) X= 1.0000000 ,(\n|\r\n|\r) /(\n|\r\n|\r)" }
end