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

Restrictions
The -qflag option can override this option.
Examples
The following example contains source code that conforms to a mixture of Fortran
standards:
!----------------------------------------------------------
! in free source form
program tt
integer :: a(100,100), b(100), i
real :: x, y
...
goto (10, 20, 30), i
10 continue
pause ’waiting for input’
20 continue
y= gamma(x)
30 continue
b = maxloc(a, dim=1, mask=a .lt 0)
end program
!----------------------------------------------------------
The following chart shows examples of how some -qlanglvl suboptions affect this
sample program:
-qlanglvl Suboption
Specified Result Reason
95pure
95std
extended
Flags PAUSE statement
Flags computed GOTO
statement
Flags GAMMA intrinsic
Flags PAUSE statement
Flags GAMMA intrinsic
No errors flagged
Deleted feature in
Fortran 95
Obsolescent feature in
Fortran 95
Extension to Fortran 95
Deleted feature in
Fortran 95
Extension to Fortran 95
Related Information
See “-qflag Option” on page 162, “-qhalt Option” on page 170, and “-qsaa Option”
on page 227.
The langlvl run-time option, which is described in “Setting Run-Time Options” on
page 51, helps to locate run-time extensions that cannot be checked for at compile
time.
190 XL Fortran Enterprise Edition for AIX : User’s Guide