re PR fortran/57822 (I/O: "(g0)" wrongly prints "E+0000")

2015-02-12  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR libgfortran/57822
	* gfortran/fmt_g0_7.f08: Adjust for archtectures with less than
	four different KINDs.

From-SVN: r220673
This commit is contained in:
Jerry DeLisle 2015-02-13 02:57:03 +00:00
parent 5f2fa78aff
commit fa47895fe6
2 changed files with 7 additions and 1 deletions

View File

@ -1,3 +1,9 @@
2015-02-12 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/57822
* gfortran/fmt_g0_7.f08: Adjust for archtectures with less than
four different KINDs.
2015-02-12 Jakub Jelinek <jakub@redhat.com>
PR c++/64884

View File

@ -4,7 +4,7 @@
program testit
use ISO_FORTRAN_ENV
implicit none
integer, parameter :: j(size(real_kinds))=REAL_KINDS
integer, parameter :: j(size(real_kinds)+4)=[REAL_KINDS, [4, 4, 4, 4]]
character(50) :: astring
integer :: i, l, n