[Bug fortran/32937] segfault with string and -fdefault-integer-8

[fxcoudert at gcc dot gnu dot org]

------- Comment #6 from fxcoudert at gcc dot gnu dot org  2007-08-11 21:31 -------
Subject: Bug 32937

Author: fxcoudert
Date: Sat Aug 11 21:31:35 2007
New Revision: 127363

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=127363
Log:
        PR fortran/32937

        * trans-array.c (gfc_conv_expr_descriptor): Use
        gfc_conv_const_charlen to generate backend_decl of right type.
        * trans-expr.c (gfc_conv_expr_op): Use correct return type.
        (gfc_build_compare_string): Use int type instead of default
        integer kind for single character comparison.
        (gfc_conv_aliased_arg): Give backend_decl the right type.
        * trans-decl.c (gfc_build_intrinsic_function_decls): Make
        compare_string return an int.

        * gfortran.dg/char_length_6.f90: New test.

        * intrinsics/string_intrinsics.c (compare_string): Return an int.
        * libgfortran.h (compare_string): Likewise.

Added:
    trunk/gcc/testsuite/gfortran.dg/char_length_6.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/trans-array.c
    trunk/gcc/fortran/trans-decl.c
    trunk/gcc/fortran/trans-expr.c
    trunk/gcc/testsuite/ChangeLog
    trunk/libgfortran/ChangeLog
    trunk/libgfortran/intrinsics/string_intrinsics.c
    trunk/libgfortran/libgfortran.h


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=32937