1*27254992SPeter Klausler! RUN: %python %S/test_errors.py %s %flang_fc1 2*27254992SPeter Klauslersubroutine sub(j) 3*27254992SPeter Klausler integer, intent(in) :: j 4*27254992SPeter Klausler !ERROR: 'j' may not be used as a DO variable 5*27254992SPeter Klausler !BECAUSE: 'j' is an INTENT(IN) dummy argument 6*27254992SPeter Klausler do j = 1, 10 7*27254992SPeter Klausler end do 8*27254992SPeter Klauslerend 9