ack/lang/basic/test/test08.bas

9 lines
136 B
QBasic
Raw Normal View History

1985-01-24 11:27:36 +00:00
100 print "start"
110 goto 130
115 print "fail 115"
120 print "line 120"
125 goto 140
127 print "fail 127"
130 goto 120
140 print "end"