[Bug fortran/99355] -freal-X-real-Y -freal-Z-real-X promotes Z to Y

[cvs-commit at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=99355

--- Comment #6 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The master branch has been updated by Tobias Burnus <burnus@gcc.gnu.org>:

https://gcc.gnu.org/g:d259ab15761de2d938c24abfba9cdcd2fef91655

commit r11-7501-gd259ab15761de2d938c24abfba9cdcd2fef91655
Author: Tobias Burnus <tobias@codesourcery.com>
Date:   Thu Mar 4 08:18:31 2021 +0100

    Fortran: Fix -freal-{4,8}-real* handling [PR99355]

    Avoid chain kind conversion for, e.g., -freal-4-real-8 -freal-8-real-10.
    Note that gfc_default_double_kind/gfc_default_double_kind already
    honors the -freal flags.

    gcc/fortran/ChangeLog:

            PR fortran/99355
            * decl.c (gfc_match_old_kind_spec, gfc_match_kind_spec): Avoid
            redoing kind conversions.
            * primary.c (match_real_constant): Likewise.

    gcc/testsuite/ChangeLog:

            PR fortran/99355
            * gfortran.dg/real4-10-real8-10.f90: New test.
            * gfortran.dg/real4-10-real8-16.f90: New test.
            * gfortran.dg/real4-10-real8-4.f90: New test.
            * gfortran.dg/real4-10.f90: New test.
            * gfortran.dg/real4-16-real8-10.f90: New test.
            * gfortran.dg/real4-16-real8-16.f90: New test.
            * gfortran.dg/real4-16-real8-4.f90: New test.
            * gfortran.dg/real4-16.f90: New test.
            * gfortran.dg/real4-8-real8-10.f90: New test.
            * gfortran.dg/real4-8-real8-16.f90: New test.
            * gfortran.dg/real4-8-real8-4.f90: New test.
            * gfortran.dg/real4-8.f90: New test.
            * gfortran.dg/real8-10.f90: New test.
            * gfortran.dg/real8-16.f90: New test.
            * gfortran.dg/real8-4.f90: New test.