1! RUN: %S/test_errors.sh %s %t %f18
2! Check subroutine with alt return
3
4       SUBROUTINE TEST (N, *, *)
5       IF ( N .EQ. 0 ) RETURN
6       IF ( N .EQ. 1 ) RETURN 1
7       RETURN 2
8       END
9