[Bug fortran/68560] [6 Regression] The test gfortran.dg/shape_8.f90 now fails when compiled with -flto

[dominiq at lps dot ens.fr]

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

--- Comment #3 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
I see the same problem with

program test_count
    integer, dimension(2,3) :: a, b
    logical, dimension(2,3) :: mask
    integer :: i(2), j(3)
    a = reshape( (/ 1, 2, 3, 4, 5, 6 /), (/ 2, 3 /))
    b = reshape( (/ 0, 7, 3, 4, 5, 8 /), (/ 2, 3 /))
    mask = a.ne.b
    j=count(mask, 1, kind=4)
    i=count(mask, 2)
end program test_count

...
     _gfortran_count_4_l (&parm.4, D.3452, D.3454);
...
      _gfortran_count_4_l (&parm.6, D.3463, D.3465, D.3467);
...