OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

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

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