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, fortran] PR24174 real(10) and complex(10) array IO broken.


I unfortunately don't have time to review this patch, but...

! { dg-do run }

You should make this conditionnal on effective target fortran_large_real.


! { dg-do run }
! { dg-require-effective-target fortran_large_real }

 real(kind=10) :: a,b(2), c
 complex(kind=10) :: d, e, f(2)

And then declare those as


integer,parameter :: k = selected_real_kind (precision (0.0_8) + 1)

  real(kind=k) :: a,b(2),c
  complex(kind=k) :: d,e,f(2)


FX



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