diff options
| author | Harald Anlauf <anlauf@gmx.de> | 2020-10-04 20:24:29 +0200 |
|---|---|---|
| committer | Harald Anlauf <anlauf@gmx.de> | 2020-10-04 20:24:29 +0200 |
| commit | 35d2c6b6e8a7448a84abbf967feeb78a29117014 (patch) | |
| tree | 25db061b1843c6b8c520ace515a1d3df3f050350 /gcc/tracer.c | |
| parent | 11bd94806d488416dfad1b1ff2ff0f98001cd0ca (diff) | |
| download | gcc-35d2c6b6e8a7448a84abbf967feeb78a29117014.zip gcc-35d2c6b6e8a7448a84abbf967feeb78a29117014.tar.gz gcc-35d2c6b6e8a7448a84abbf967feeb78a29117014.tar.bz2 | |
PR fortran/97272 - Wrong answer from MAXLOC with character arg
The optional KIND argument to the MINLOC/MAXLOC intrinsic must not be
passed to the library function, as the kind conversion of the result
is treated explicitly elsewhere.
gcc/fortran/ChangeLog:
PR fortran/97272
* trans-intrinsic.c (strip_kind_from_actual): Helper function for
removal of KIND argument.
(gfc_conv_intrinsic_minmaxloc): Ignore KIND argument here, as it
is treated elsewhere.
gcc/testsuite/ChangeLog:
PR fortran/97272
* gfortran.dg/pr97272.f90: New test.
Diffstat (limited to 'gcc/tracer.c')
0 files changed, 0 insertions, 0 deletions