[Bug fortran/92805] gfortran: blanks within literal constants should not be allowed

[cvs-commit at gcc dot gnu.org via Gcc-bugs]

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

--- Comment #13 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The master branch has been updated by Harald Anlauf <anl...@gcc.gnu.org>:

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

commit r13-1905-gd325e7048c85e13f12ea79aebf9623eddc7ffcaf
Author: Harald Anlauf <anl...@gmx.de>
Date:   Thu Jul 28 22:07:02 2022 +0200

    Fortran: detect blanks within literal constants in free-form mode [PR92805]

    gcc/fortran/ChangeLog:

            PR fortran/92805
            * match.cc (gfc_match_small_literal_int): Make gobbling of leading
            whitespace optional.
            (gfc_match_name): Likewise.
            (gfc_match_char): Likewise.
            * match.h (gfc_match_small_literal_int): Adjust prototype.
            (gfc_match_name): Likewise.
            (gfc_match_char): Likewise.
            * primary.cc (match_kind_param): Match small literal int or name
            without gobbling whitespace.
            (get_kind): Do not skip over blanks.
            (match_string_constant): Likewise.

    gcc/testsuite/ChangeLog:

            PR fortran/92805
            * gfortran.dg/literal_constants.f: New test.
            * gfortran.dg/literal_constants.f90: New test.

    Co-authored-by: Steven G. Kargl <ka...@gcc.gnu.org>