Neil Carlson writes about a compiler which insists that INTENT match for
dummy procedures. Section 12.4.1.2 of the F95 standard (Actual arguments
associated with dummy procedures) says:
"If the interface of the dummy procedure is explicit, the characteristics
listed in 12.2 shall be the same for the associated actual procedure and the
corresponding dummy procedure, except that a pure actual procedure may be
associated with a dummy procedure that is not pure and an elemental
intrinsic actual procedure may be associated with a dummy procedure that is
not elemental."
Section 12.2 does not include INTENT among the "characteristics" of an
argument, therefore a mismatch in INTENT is not an error.
I seem to recall that some earlier versions of our compilers complained
about this inappropriately - current versions do not.
Please send Visual Fortran support requests to [log in to unmask]
Steve Lionel
Compaq Fortran Engineering
http://www.compaq.com/fortran
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|