10 PRINT "PROGRAM FILE 46: INTERACTION OF CONTROL STATEMENTS WITH" 20 PRINT "

THE FOR-STATEMENT."

30 PRINT " ANSI STANDARD 11.2, 11.4, 10.2, 10.4"

40 PRINT

50 PRINT "SECTION 46.1: INTERACTION OF GOSUB-STATEMENT WITH" 60 PRINT "

70 PRINT

THE FOR-STATEMENT."

80 PRINT "THIS SECTION TESTS THAT A GOSUB ROUTINE CAN BE EXECUTED" 90 PRINT "FROM WITHIN A FOR-BLOCK."

***

690 REM END OF CALLED-FROM-FOR-BLOCK SUBROUTINE

700 PRINT "SECTION 46.2: FOR-LOOPS WITH SAME CONTROL-VARIABLE" 710 PRINT "

720 PRINT

NESTED DYNAMICALLY WITH GOSUB."

730 PRINT "THIS SECTION TESTS THAT A GOSUB ROUTINE CAN BE EXECUTED" 740 PRINT "FROM WITHIN A FOR-BLOCK AND THAT THE SUBROUTINE MAY ITSELF" 750 PRINT "CONTAIN A FOR-BLOCK. IF THE TWO FOR-BLOCKS USE THE SAME" 760 PRINT "CONTROL-VARIABLE, THE ORIGINAL VALUE IS LOST."

1570 REM END OF CALLED-FROM-FOR-BLOCK SUBROUTINE

1580 PRINT

1590 PRINT "SECTION 46.3 CONTROL-STATEMENT JUMPS OUT OF FOR-BLOCK." 1600 PRINT

1610 PRINT "THIS SECTION TESTS THAT YOU CAN JUMP OUT OF A FOR-BLOCK" 1620 PRINT "AND THAT THE CONTROL-VARIABLE RETAINS ITS VALUE WHEN" 1625 PRINT "THIS HAPPENS."

1703 PRINT "LOOP IS: FOR I1=";A1;" TO ";B1;" STEP ";C1

1810 PRINT "NORMAL EXIT FROM FOR-BLOCK: INCORRECT."

2050 PRINT "LOOP IS: FOR I1=";A1;" TO ";B1;" STEP ";C1

2160 PRINT "NORMAL EXIT FROM FOR-BLOCK: INCORRECT."

PROGRAM FILE 46: INTERACTION OF CONTROL STATEMENTS WITH
THE FOR-STATEMENT.

ANSI STANDARD 11.2, 11.4, 10.2, 10.4

SECTION 46.1: INTERACTION OF GOSUB-STATEMENT WITH

THE FOR-STATEMENT.

THIS SECTION TESTS THAT A GOSUB ROUTINE CAN BE EXECUTED
FROM WITHIN A FOR-BLOCK.