END PROGRAM 62

END TEST

10 PRINT "PROGRAM FILE 63: EXCEPTION SUBSCRIPT TOO LARGE FOR" 15 PRINT "

20 PRINT "|

30 PRINT

ONE-DIMENSIONAL ARRAY."

ANSI STANDARD 6.5"

40 PRINT "SECTION 63.1: EXCEPTION SUBSCRIPT TOO LARGE FOR" 50 PRINT "

60 PRINT

ONE-DIMENSIONAL ARRAY."

70 PRINT "THE OBJECT OF THIS TEST IS TO SEE WHETHER THE PROCESSOR" 80 PRINT "RECOGNIZES A FATAL EXCEPTION WHEN A SUBSCRIPT EXCEEDS" 90 PRINT "THE IMPLICIT UPPER BOUND OF AN ARRAY."

100 PRINT

110 PRINT "TO PASS THIS TEST:"

120 PRINT

130 PRINT "

140 PRINT " 150 PRINT

160 PRINT " 170 PRINT "

180 PRINT

190 PRINT "

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

2) THE PROGRAM MUST TERMINATE UPON USE OF THE ILLEGAL" SUBSCRIPT."

BEGIN TEST."

PROGRAM FILE 63: EXCEPTION - SUBSCRIPT TOO LARGE FOR

ONE-DIMENSIONAL ARRAY.

ANSI STANDARD 6.5

SECTION 63.1: EXCEPTION - SUBSCRIPT TOO LARGE FOR

ONE-DIMENSIONAL ARRAY.

THE OBJECT OF THIS TEST IS TO SEE WHETHER THE PROCESSOR
RECOGNIZES A FATAL EXCEPTION WHEN A SUBSCRIPT EXCEEDS
THE IMPLICIT UPPER BOUND OF AN ARRAY.

TO PASS THIS TEST:

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

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

BEGIN TEST.

ABOUT TO ASSIGN TO A( 7 ). ASSIGNMENT SHOULD BE OK.
HAVE ASSIGNED 13
13 TO A

7).

ABOUT TO ASSIGN TO A( 8 ). ASSIGNMENT SHOULD BE OK.
HAVE ASSIGNED 12 TO A( 8 ).

ABOUT TO ASSIGN TO A( 9 ). ASSIGNMENT SHOULD BE OK.
HAVE ASSIGNED 11 TO A( 9 ).

ABOUT TO ASSIGN TO A( 10 ). ASSIGNMENT SHOULD BE OK.

HAVE ASSIGNED 10 TO A( 10 ).

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

70 PRINT "THE OBJECT OF THIS TEST IS TO SEE WHETHER THE PROCESSOR" 80 PRINT "RECOGNIZES A FATAL EXCEPTION WHEN A SUBSCRIPT EXCEEDS" 90 PRINT "THE IMPLICIT LOWER BOUND OF AN ARRAY."

100 PRINT

110 PRINT "TO PASS THIS TEST:"

120 PRINT

130 PRINT "

140 PRINT " 150 PRINT

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

160 PRINT "

170 PRINT

180 PRINT

190 PRINT "

200 PRINT

2) THE PROGRAM MUST TERMINATE UPON USE OF THE ILLEGAL" SUBSCRIPT."

210 FOR I=3 TO -2 STEP -1

BEGIN TEST."

THE OBJECT OF THIS TEST IS TO SEE WHETHER THE PROCESSOR
RECOGNIZES A FATAL EXCEPTION WHEN A SUBSCRIPT EXCEEDS
THE IMPLICIT LOWER BOUND OF AN ARRAY.

TO PASS THIS TEST:

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

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

BEGIN TEST.

ABOUT TO ASSIGN TO B(7, 3 ). ASSIGNMENT SHOULD BE OK.
HAVE ASSIGNED 17 TO B(7, 3 ).

ABOUT TO ASSIGN TO B(7, 2). ASSIGNMENT SHOULD BE OK.

HAVE ASSIGNED 18 TO B(7, 2).

ABOUT TO ASSIGN TO B(7, 1 ). ASSIGNMENT SHOULD BE
HAVE ASSIGNED 19 TO B(7, 1 ).

ABOUT TO ASSIGN TO B(7, 0 ). ASSIGNMENT SHOULD BE OK.
HAVE ASSIGNED 20 TO B(7, 0 ).

ABOUT TO ASSIGN TO B(7,-1 ).*** EXCEPTION SHOULD OCCUR NOW ***

? DIMENSION ERROR IN LINE 270

10 PRINT "PROGRAM FILE 65: EXCEPTION - SUBSCRIPT TOO SMALL FOR"
15 PRINT "
ONE-DIMENSIONAL ARRAY, WITH DIM."

20 PRINT " ANSI STANDARD 6.5, 15.2, 15.4"

30 PRINT

40 PRINT "SECTION 65.1: EXCEPTION - SUBSCRIPT TOO SMALL FOR"

50 PRINT "

60 PRINT

ONE-DIMENSIONAL ARRAY, WITH DIM."

70 PRINT "THE OBJECT OF THIS TEST IS TO SEE WHETHER THE PROCESSOR"

80 PRINT "RECOGNIZES USE OF A NEGATIVE SUBSCRIPT AS A FATAL EXCEPTION" 90 PRINT "WHEN NO OPTION HAS BEEN SPECIFIED."

100 PRINT

110 PRINT "TO PASS THIS TEST:"

120 PRINT

130 PRINT "

140 PRINT " 150 PRINT 160 PRINT " 170 PRINT "

180 PRINT 190 PRINT "

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

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

BEGIN TEST."

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
20 TO A( 0 ).

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

? DIMENSION ERROR IN LINE 280

** **

10 PRINT "PROGRAM FILE 66: EXCEPTION SUBSCRIPT TOO LARGE FOR" 15 PRINT " TWO-DIMENSIONAL ARRAY, WITH DIM."

20 PRINT " ANSI STANDARD 6.5, 15.2, 15.4"

30 PRINT

40 PRINT "SECTION 66.1: EXCEPTION SUBSCRIPT TOO LARGE FOR" 50 PRINT "

60 PRINT

TWO-DIMENSIONAL ARRAY, WITH DIM."

70 PRINT "THE OBJECT OF THIS TEST IS TO SEE WHETHER THE PROCESSOR" 80 PRINT "RECOGNIZES A FATAL EXCEPTION WHEN A SUBSCRIPT EXCEEDS" 90 PRINT "THE EXPLICIT UPPER BOUND OF AN ARRAY."

100 PRINT

110 PRINT "TO PASS THIS TEST:"

120 PRINT