[Bug fortran/82184] [8 Regression] 187.facerec in SPEC CPU 2000 miscompares

["paul.richard.thomas at gmail dot com" <gcc-bugzilla at gcc dot gnu dot org>]

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

--- Comment #6 from paul.richard.thomas at gmail dot com <paul.richard.thomas at gmail dot com> ---
Thanks Andrey. I'll get to it as soon as I can.

Paul


On 13 September 2017 at 21:12, andrey.y.guskov at intel dot com
<gcc-bugzilla@gcc.gnu.org> wrote:
> https://gcc.gnu.org/bugzilla/show_bug.cgi?id=82184
>
> --- Comment #5 from Andrey Guskov <andrey.y.guskov at intel dot com> ---
> program r187
>
> call s()
> call s()
>
> contains
> subroutine s()
>
> complex(4), allocatable, save :: a(:, :)
> complex(4), pointer,     save :: b(:, :)
>
> if (.not. associated(b)) then
> allocate(a(2, 2))
> allocate(b(2, 2))
> a(1, 1) = cmplx(12, 34)
> a(2, 2) = cmplx(56, 78)
> else
> b = transpose(a)
> print *, merge("PASSED", "FAILED", a(1, 1) .eq. b(1, 1))
> end if
>
> end subroutine s
>
> end program r187
>
>
> # pre-r251949
> $ gfortran -Ofast r187.f90 -o r187 && ./r187
>  PASSED
>
> # post-r251949
> $ gfortran -Ofast r187.f90 -o r187 && ./r187
>  FAILED
>
> --
> You are receiving this mail because:
> You are on the CC list for the bug.