[Bug fortran/88658] [9 Regression] Intrinsic MAX1 returns a REAL result, should be INTEGER.

[tkoenig at gcc dot gnu.org]

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

--- Comment #1 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
Author: tkoenig
Date: Sun Jan  6 12:48:58 2019
New Revision: 267609

URL: https://gcc.gnu.org/viewcvs?rev=267609&root=gcc&view=rev
Log:
2019-01-06  Thomas Koenig  <tkoe...@gcc.gnu.org>

        PR fortran/88658
        * gfortran.h: Add macro gfc_real_4_kind
        * simplify.c (simplify_min_max): Special case for the types of
        AMAX0, AMIN0, MAX1 and MIN1, which actually change the types of
        their arguments.

2019-01-06  Thomas Koenig  <tkoe...@gcc.gnu.org>

        PR fortran/88658
        * gfortran.dg/min_max_type_2.f90: New test.


Added:
    trunk/gcc/testsuite/gfortran.dg/min_max_type_2.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/gfortran.h
    trunk/gcc/fortran/simplify.c
    trunk/gcc/testsuite/ChangeLog