diff options
author | Thomas Koenig <tkoenig@gcc.gnu.org> | 2017-12-03 20:14:05 +0000 |
---|---|---|
committer | Thomas Koenig <tkoenig@gcc.gnu.org> | 2017-12-03 20:14:05 +0000 |
commit | 0ac7425470a37554aa4dd017afb5f90b7328c9b0 (patch) | |
tree | b31908b5003acf7307242caf1ae5698a3d2a3fb9 /libgfortran/gfortran.map | |
parent | af5ad1e2e56a91db15c1f714f5f513ad54a07eeb (diff) |
re PR fortran/36313 ([F03] {MIN,MAX}{LOC,VAL} should accept character arguments)
2017-12-03 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/36313
* check.c (gfc_check_minval_maxval): Use
int_orLreal_or_char_check_f2003 for array argument.
* iresolve.c (gfc_resolve_maxval): Insert number in
function name for character arguments.
(gfc_resolve_minval): Likewise.
* trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc):
Fix comment.
(gfc_conv_intrinsic_minmaxval): Resort arguments and call library
function if dealing with a character function.
2017-12-03 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/36313
* Makefile.am: Add new files for character-valued
maxval and minval.
* Makefile.in: Regenerated.
* gfortran.map: Add new functions.
* m4/iforeach-s2.m4: New file.
* m4/ifunction-s2.m4: New file.
* m4/iparm.m4: Add intitval for minval and maxval.
* m4/maxval0s.m4: New file.
* m4/maxval1s.m4: New file.
* m4/minval0s.m4: New file.
* m4/minval1s.m4: New file.
* generated/maxval0_s1.c: New file.
* generated/maxval0_s4.c: New file.
* generated/maxval1_s1.c: New file.
* generated/maxval1_s4.c: New file.
* generated/minval0_s1.c: New file.
* generated/minval0_s4.c: New file.
* generated/minval1_s1.c: New file.
* generated/minval1_s4.c: New file.
2017-12-03 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/36313
* gfortran.dg/maxval_char_1.f90: New test.
* gfortran.dg/maxval_char_2.f90: New test.
* gfortran.dg/maxval_char_3.f90: New test.
* gfortran.dg/maxval_char_4.f90: New test.
* gfortran.dg/minval_char_1.f90: New test.
* gfortran.dg/minval_char_2.f90: New test.
* gfortran.dg/minval_char_3.f90: New test.
* gfortran.dg/minval_char_4.f90: New test.
From-SVN: r255367
Diffstat (limited to 'libgfortran/gfortran.map')
-rw-r--r-- | libgfortran/gfortran.map | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/libgfortran/gfortran.map b/libgfortran/gfortran.map index 4f8b4f3e298..d3403af0dac 100644 --- a/libgfortran/gfortran.map +++ b/libgfortran/gfortran.map @@ -420,6 +420,10 @@ GFORTRAN_8 { _gfortran_maxloc2_4_s4; _gfortran_maxloc2_8_s1; _gfortran_maxloc2_8_s4; + _gfortran_maxval0_s1; + _gfortran_maxval0_s4; + _gfortran_maxval1_s1; + _gfortran_maxval1_s4; _gfortran_maxval_i16; _gfortran_maxval_i1; _gfortran_maxval_i2; @@ -513,6 +517,10 @@ GFORTRAN_8 { _gfortran_minloc2_4_s4; _gfortran_minloc2_8_s1; _gfortran_minloc2_8_s4; + _gfortran_minval0_s1; + _gfortran_minval0_s4; + _gfortran_minval1_s1; + _gfortran_minval1_s4; _gfortran_minval_i16; _gfortran_minval_i1; _gfortran_minval_i2; @@ -599,6 +607,10 @@ GFORTRAN_8 { _gfortran_mmaxloc2_4_s4; _gfortran_mmaxloc2_8_s1; _gfortran_mmaxloc2_8_s4; + _gfortran_mmaxval0_s1; + _gfortran_mmaxval0_s4; + _gfortran_mmaxval1_s1; + _gfortran_mmaxval1_s4; _gfortran_mmaxval_i16; _gfortran_mmaxval_i1; _gfortran_mmaxval_i2; @@ -680,6 +692,10 @@ GFORTRAN_8 { _gfortran_mminloc2_4_s4; _gfortran_mminloc2_8_s1; _gfortran_mminloc2_8_s4; + _gfortran_mminval0_s1; + _gfortran_mminval0_s4; + _gfortran_mminval1_s1; + _gfortran_mminval1_s4; _gfortran_mminval_i16; _gfortran_mminval_i1; _gfortran_mminval_i2; @@ -927,6 +943,10 @@ GFORTRAN_8 { _gfortran_smaxloc2_4_s4; _gfortran_smaxloc2_8_s1; _gfortran_smaxloc2_8_s4; + _gfortran_smaxval0_s1; + _gfortran_smaxval0_s4; + _gfortran_smaxval1_s1; + _gfortran_smaxval1_s4; _gfortran_smaxval_i16; _gfortran_smaxval_i1; _gfortran_smaxval_i2; @@ -1008,6 +1028,10 @@ GFORTRAN_8 { _gfortran_sminloc2_4_s4; _gfortran_sminloc2_8_s1; _gfortran_sminloc2_8_s4; + _gfortran_sminval0_s1; + _gfortran_sminval0_s4; + _gfortran_sminval1_s1; + _gfortran_sminval1_s4; _gfortran_sminval_i16; _gfortran_sminval_i1; _gfortran_sminval_i2; |