Skip to content

Commit e7e082f

Browse files
committed
Rename to 6.2 format
1 parent a3e8fcb commit e7e082f

File tree

1 file changed

+10
-7
lines changed

1 file changed

+10
-7
lines changed

samples/JUMPTEST.DO samples/JMPTST.DO

+10-7
Original file line numberDiff line numberDiff line change
@@ -1,11 +1,12 @@
11
1 ' Test for m100-jumps.lex which
22
2 ' emits all lines which are targets
33
3 ' of GOTO or similar commands.
4-
4 ' Line numbers <500 should be printed. >= 500 should not.
5-
5 '
6-
6 ' When testing m100-decommenter,
7-
7 ' lines 500--1000 will be removed.
8-
8 '
4+
4 '
5+
5 ' Line numbers <500 should be printed. >= 500 should not.
6+
6 '
7+
7 ' When testing m100-decommenter,
8+
8 ' lines 500--1000 will be removed.
9+
9 '
910
10 REM ERL Equals
1011
20 REM ERL Less than
1112
30 REM ERL Less than or equal to
@@ -23,7 +24,8 @@
2324
150 REM ALL CATS ARE GREY
2425
160 REM RUN 160
2526
170 REM GOSUB 170
26-
180 REM ON A GO TO 1,2,3, 180, 4,5,6,7,8,9
27+
180 REM ON A GO TO 1,2,3, 180, 4,5,6
28+
190 REM ON COM GOSUB 1,2,3, 190, 7,8,9
2729
500 '
2830
510 REM DATA GOTO 510
2931
520 REM DATA "GOTO 520"
@@ -45,7 +47,8 @@
4547
1150 GOTO 150
4648
1160 RUN 160
4749
1170 GOSUB 170
48-
1170 ON A GO TO 1,2,3, 180, 4,5,6,7,8,9
50+
1180 ON A GO TO 1,2,3, 180, 4,5,6
51+
1190 ON COM GOSUB 1,2,3, 190, 7,8,9
4952
1500 '
5053
1510 DATA GOTO 510
5154
1520 DATA "GOTO 520"

0 commit comments

Comments
 (0)