re PR fortran/31198 (wrong code: Max() with optional arguments)
commit0160a2c7006d7c456e87acb37132f601a4632109
authorFrançois-Xavier Coudert <fxcoudert@gcc.gnu.org>
Wed, 4 Jul 2007 07:25:39 +0000 (4 07:25 +0000)
committerFrançois-Xavier Coudert <fxcoudert@gcc.gnu.org>
Wed, 4 Jul 2007 07:25:39 +0000 (4 07:25 +0000)
treee4ae49bc19dd3192333c573f73ec660a220cec1b
parent71d5b5e1656f72ea2b232ddd01089673f58970c7
re PR fortran/31198 (wrong code: Max() with optional arguments)

PR fortran/31198

* trans-intrinsic.c (trans-intrinsic.c): Handle optional
arguments correctly for MIN and MAX intrinsics.

* gfortran.dg/min_max_optional_1.f90: New test.
* gfortran.dg/min_max_optional_2.f90: New test.
* gfortran.dg/min_max_optional_3.f90: New test.

From-SVN: r126307
gcc/fortran/ChangeLog
gcc/fortran/trans-intrinsic.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/min_max_optional_1.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/min_max_optional_2.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/min_max_optional_3.f90 [new file with mode: 0644]