PROGRAM FILE 45: ALTERING THE CONTROL-VARIABLE WITHIN
        A FOR-BLOCK.
    ANSI STANDARD 11.2, 11.4

SECTION 45.1: ALTERING THE CONTROL-VARIABLE WITHIN
        A FOR-BLOCK.

THIS SECTION TESTS THAT THE VALUE OF THE CONTROL-VARIABLE
MAY BE ALTERED BY STATEMENTS WITHIN THE FOR-BLOCK, AS
WELL AS UNDER THE DIRECT CONTROL OF THE FOR-STATEMENT.

               BEGIN TEST.

CONTROL VARIABLE:
SHOULD BE      ACTUAL         RESULT
 3              3               OK  
 6              6               OK  
 9              9               OK  
CONTROL VARIABLE ALTERED.
 20             20              OK  
LOOP EXITED
 23             23              OK  

NO. TIMES THROUGH LOOP:
SHOULD BE:  4      ACTUAL:  4    RESULT:   OK  

*** TEST PASSED ***

               END TEST.

END PROGRAM 45
