[Bug fortran/107266] Reject kind=4 characters for BIND(C) – it invalid and generates wrong code

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

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

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

https://gcc.gnu.org/g:8950288333162caa68b85c71ed2d02f40976ddb9

commit r13-3338-g8950288333162caa68b85c71ed2d02f40976ddb9
Author: Tobias Burnus <tob...@codesourcery.com>
Date:   Mon Oct 17 18:15:16 2022 +0200

    Fortran: Fixes for kind=4 characters strings [PR107266]

            PR fortran/107266

    gcc/fortran/
            * trans-expr.cc (gfc_conv_string_parameter): Use passed
            type to honor character kind.
            * trans-types.cc (gfc_sym_type): Honor character kind.
            * trans-decl.cc (gfc_conv_cfi_to_gfc): Fix handling kind=4
            character strings.

    gcc/testsuite/
            * gfortran.dg/char4_decl.f90: New test.
            * gfortran.dg/char4_decl-2.f90: New test.