[Bug fortran/34896] [4.3 Regression] libgomp.fortran/reduction5.f90

[pault at gcc dot gnu dot org]

------- Comment #2 from pault at gcc dot gnu dot org  2008-01-21 05:40 -------
Confirmed

This is the reduced version

! { dg-do run }

module reduction5
  intrinsic min, max
end module reduction5

program reduction_5_regression
  call test2
contains
  subroutine test2
    use reduction5, min => max, max => min
    integer a, b
    a = max (1,5)
    b = min (1,5)
    if (a .ne. 1) call abort ()
    if (b .ne. 5) call abort ()
  end subroutine test2
end

! { dg-final { cleanup-modules "reduction5" } }

I'll fix it by tonight.  Thanks HJ - libgomp is an area that I do not test and
should.

Paul


-- 

pault at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|unassigned at gcc dot gnu   |pault at gcc dot gnu dot org
                   |dot org                     |
             Status|UNCONFIRMED                 |ASSIGNED
     Ever Confirmed|0                           |1
   Last reconfirmed|0000-00-00 00:00:00         |2008-01-21 05:40:36
               date|                            |


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34896