blob: dc13105129958a4dcb2e4c7919b4abacbe59dbe4 [file] [log] [blame]
program test4 !<<<<< 1,1,pass
INTEGER :: chicken = 0
INTEGER :: rice
do
! This is a comment before the refactored line
if(chicken< 0) then ! This is a comment on the refactored line
goto 10
else if(chicken == 0) then
goto 20
else
goto 30
end if
! This is a comment after the refactored line
end do
10 rice = 1
goto 40
20 rice = 2
goto 40
30 rice = &
& 3
40 print *, rice
end program test4