fexit.for

开放源码的编译器open watcom 1.6.0版的源代码

      PRINT *, 'Start'
      I = 0
      LOOP
	  PRINT *, I
	  I = I + 1
	  GOTO 10
5	  PRINT *, 'Skip'
10    ENDLOOP
      PRINT *, 'End'
      END