From 5fcc6ec223fed0d7dcd200bd3ee08ef6ae1c4965 Mon Sep 17 00:00:00 2001 From: fxcoudert Date: Mon, 6 Aug 2007 20:47:17 +0000 Subject: PR fortran/29828 * trans.h (gfor_fndecl_string_minmax): New prototype. * trans-decl.c (gfor_fndecl_string_minmax): New variable. (gfc_build_intrinsic_function_decls): Create gfor_fndecl_string_minmax. * check.c (gfc_check_min_max): Allow for character arguments. * trans-intrinsic.c (gfc_conv_intrinsic_minmax_char): New function. (gfc_conv_intrinsic_function): Add special case for MIN and MAX intrinsics with character arguments. * simplify.c (simplify_min_max): Add simplification for character arguments. * intrinsics/string_intrinsics.c (string_minmax): New function and prototype. * gfortran.map (GFORTRAN_1.0): Add _gfortran_string_minmax * gfortran.dg/minmax_char_1.f90: New test. * gfortran.dg/minmax_char_2.f90: New test. * gfortran.dg/min_max_optional_4.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@127252 138bc75d-0d04-0410-961f-82ee72b054a4 --- libgfortran/gfortran.map | 1 + 1 file changed, 1 insertion(+) (limited to 'libgfortran/gfortran.map') diff --git a/libgfortran/gfortran.map b/libgfortran/gfortran.map index c16dd1eee33..ed881ebfbcc 100644 --- a/libgfortran/gfortran.map +++ b/libgfortran/gfortran.map @@ -941,6 +941,7 @@ GFORTRAN_1.0 { _gfortran_st_rewind; _gfortran_string_index; _gfortran_string_len_trim; + _gfortran_string_minmax; _gfortran_string_scan; _gfortran_string_trim; _gfortran_string_verify; -- cgit v1.2.3