PROGRAM FILE 65: EXCEPTION - SUBSCRIPT TOO SMALL FOR
        ONE-DIMENSIONAL ARRAY, WITH DIM.
    ANSI STANDARD 6.5, 15.2, 15.4

SECTION 65.1: EXCEPTION - SUBSCRIPT TOO SMALL FOR
        ONE-DIMENSIONAL ARRAY, WITH DIM.

THE OBJECT OF THIS TEST IS TO SEE WHETHER THE PROCESSOR
RECOGNIZES USE OF A NEGATIVE SUBSCRIPT AS A FATAL EXCEPTION
WHEN NO OPTION HAS BEEN SPECIFIED.

TO PASS THIS TEST:

    1) A MESSAGE IDENTIFYING THE EXCEPTION MUST BE
       DISPLAYED, AND

    2) THE PROGRAM MUST TERMINATE UPON USE OF THE
       NEGATIVE SUBSCRIPT.

                               BEGIN TEST.

ABOUT TO ASSIGN TO A( 3 ). ASSIGNMENT SHOULD BE OK.
HAVE ASSIGNED  17  TO A( 3 ).

ABOUT TO ASSIGN TO A( 2 ). ASSIGNMENT SHOULD BE OK.
HAVE ASSIGNED  18  TO A( 2 ).

ABOUT TO ASSIGN TO A( 1 ). ASSIGNMENT SHOULD BE OK.
HAVE ASSIGNED  19  TO A( 1 ).

ABOUT TO ASSIGN TO A( 0 ). ASSIGNMENT SHOULD BE OK.
HAVE ASSIGNED  20  TO A( 0 ).

ABOUT TO ASSIGN TO A(-1 ).*** EXCEPTION SHOULD OCCUR NOW ***

ERROR in line 280: SUBSCRIPT OUT OF RANGE A(-1)
