! { dg-do compile } ! { dg-options "-Warray-temporaries" } ! PR 45159 - make sure no temporary is created for this. subroutine foo(a,n,i,j) implicit none integer, intent(in) :: i,j,n real, dimension(20) :: a a(1:10) = a(i:j) a(20:n:-3) = a(n:i:-3) end subroutine foo