PR30372

[François-Xavier Coudert]

> For REAL(kind=10) I found (gfortran.dg/large_real_kind_form_io_1.f90):
>
>  { dg-require-effective-target fortran_large_real }
>   ! This should be 10 on systems that support kind=10
>   integer, parameter :: k = selected_real_kind (precision (0.0_8) + 1)
>   real(kind=k) :: a,b(2), c, eps
>
> Given the fortran_large_real requirement, is it viable to use:
>   real(kind=10) :: r10
>   real(kind=16) :: r16
> in the testcases to be created?

No. It's only viable to use the code you quoted:
  integer, parameter :: k = selected_real_kind (precision (0.0_8) + 1)
  real(kind=k) :: r_large

Because we might have one of those large kinds, but we won't have both
(this is hard-coded in the library).

FX