C { dg-do compile }
C { dg-options -Wtabs }
C Check for embedded tabs, which are illegal characters.
C
CTABprogram tab
	program tab              ! { dg-warning "nonstandard tab" "" }
       integer i
       i = 1
C if (i.eq.i)TABi = i + 1
       if (i.eq.1)	i = i + 1 ! { dg-warning "nonstandard tab" "" }
       end