XL Fortran Enterprise Edition for AIX : User's Guide - IBM

2003std
Sets the IOSTAT variables based on Fortran 2003’s definition of values
and conditions.
For example, setting the iostat_end=2003std run-time option results in a
different IOSTAT value from extensions being returned for the end-of-file
condition
export XLFRTEOPTS=iostat_end=2003std
character(10) ifl
integer(4) aa(3), ios
ifl = "12344321 "
read(ifl, ’(3i4)’, iostat=ios) aa ! end-of-file condition occurs and
! ios is set to -1 instead of -2.
For more information on setting and using IOSTAT values, see the READ,
WRITE, and Conditions and IOSTAT Values sections in the XL Fortran Enterprise
Edition for AIX Language Reference.
intrinthds={num_threads}
Specifies the number of threads for parallel execution of the MATMUL and
RANDOM_NUMBER intrinsic procedures. The default value for num_threads
when using the MATMUL intrinsic equals the number of processors online.
The default value for num_threads when using the RANDOM_NUMBER
intrinsic is equal to the number of processors online*2.
Changing the number of threads available to the MATMUL and
RANDOM_NUMBER intrinsic procedures can influence performance.
langlvl={extended | 90ext| 90std | 95std | 2003std}
Determines the level of support for Fortran standards and extensions to the
standards. The values of the suboptions are as follows:
90std
90ext
95std
2003std
Specifies that the compiler should flag any extensions to the
Fortran 90 standard I/O statements and formats as errors.
Currently, provides the same level of support as the extended
suboption. 90ext was the default suboption prior to XL Fortran
Version 7.1. However, this suboption is now obsolete, and to
avoid problems in the future, you should start using the
extended suboption as soon as possible.
Specifies that the compiler should flag any extensions to the
Fortran 95 standard I/O statements and formats as errors.
Specifies that the compiler should accept all standard I/O
statements and formats that the Fortran 95 standard specifies,
as well as those Fortran 2003 formats that XL Fortran supports.
Anything else is flagged as an error.
For example, setting the langlvl=2003std run-time option
results in a run-time error message.
integer(4) aa(100)
call setrteopts("langlvl=2003std")
... ! Write to a unit without explicitly
... ! connecting the unit to a file.
write(10, *) aa ! The implicit connection to a file does not
... ! comform with Fortran 2003 behavior.
extended Specifies that the compiler should accept the Fortran 95
language standard, Fortran 2003 features supported by XL
Fortran, and extensions, effectively turning off language-level
checking.
Editing, Compiling, Linking, and Running XL Fortran Programs 55