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

--- Comment #9 from MarkEggleston <mark.eggleston at codethink dot com> ---
(In reply to Thomas Koenig from comment #5)
> (In reply to MarkEggleston from comment #3)
> > Looks like I missed MIN with literals.
> > 
> > integer(2) :: a2
> > integer(4) :: a4
> > write(*,*) kind(max(7, 9_1))
> > write(*,*) kind(max(7_2, 9))
> > write(*,*) kind(max(a2, a4))
> > write(*,*) kind(min(7_2, 9))
> > write(*,*) kind(min(a2, a4))
> > end
> > 
> > gives
> > 
> >            4
> >            2
> >            4
> >            2
> >            4
> > 
> > So there is discrepancy between literal parameters and variables for MAX and
> > MIN.
> 
> That is a bug, IMHO.
> 
> In general, I disagree with the statement that a bug can be turned into
> a feature by documenting it :-)

Submitted as PR fortran/89240

Reply via email to