[Bug testsuite/82093] New: gfortran.dg/vect/pr70043.f90 contains out-of-bounds references

[tkoenig at gcc dot gnu.org]

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

            Bug ID: 82093
           Summary: gfortran.dg/vect/pr70043.f90 contains out-of-bounds
                    references
           Product: gcc
           Version: unknown
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: testsuite
          Assignee: unassigned at gcc dot gnu.org
          Reporter: tkoenig at gcc dot gnu.org
  Target Milestone: ---

The test case contains out-of-bounds references
to a(i) and b(i):

subroutine fn1(a, b)
  real(8), intent(in) ::  b(100)
  real(8), intent(inout) :: a(100)
  real(8) c
  do i=0,100
     if( a(i) < 0.0 ) then
        c =  a(i) * b(i)
        a(i) = a(i) - c / b(i)
     endif
  enddo
end subroutine fn1

Are these necessary for the test, or can they
just be fixed?