Operating System - HP-UX
1753386 Members
5924 Online
108792 Solutions
New Discussion

Fortran 90 runtime range checking array subscripts

 
Richard Schmidt
Occasional Contributor

Fortran 90 runtime range checking array subscripts

Using the compile flag +check=all, Fortran 90 on HPUX 11.11 (B11.11.93) would trap and abort on array subscripts out of range,and point to the correct source line:
"FORTRAN RANGE ERROR 950: SUBSCRIPT, SUBSTRING, OR PARAMETER OUT OF BOUNDS AT LINE NUMBER 8".

But the same code and compile option with HP-UX f90 B.11.31.03 (Itanium(R)-based host and target) gives only the warning
*** FORTRAN RANGE ERROR 950: SUBSCRIPT, SUBSTRING, OR PARAMETER OUT OF BOUNDS in file at line 1556 in arra with dimension 33487"
and does not abort. See the attached code sample. Is there any way to bring back the "abort on array subscript out-of-bound" on Fortran 90 for HP-UX 11.31? Thanks!
1 REPLY 1
Dennis Handly
Acclaimed Contributor

Re: Fortran 90 runtime range checking array subscripts

I don't see any code to abort. All calls to FTN_RANGE_ERR just return.

You'll need to contact the Response Center with your enhancement request.

Using +check= with aC++ or C will continue after each error but then abort at the end so you can see all of your errors. But it is customizable (RTC_NO_ABORT) to abort on the first.