The following is invalid Fortran 95/2003:
call sub (len, "abcdef")
unless one has used before "intrinsic len".
gfortran happily accepts this, "ifort -stand f03" diagnoses:
fortcom: Warning: intrinsic_actual_4.f90, line 17: Allowing an intrinsic
procedure name to appear as an actual argument when the intrinsic procedure is
not explicitly declared as INTRINSIC is not standard F2003. [LEN]
As does NAG f95:
Actual INTRINSIC procedure argument LEN not declared INTRINSIC
Longer excerpt from gfortran.dg/intrinsic_actual_4.f90:
implicit none
integer i
i = len ("123")
call sub (len, "abcdef")
where sub takes as argument an integer function with implicit interface.
--
Summary: -stf=f* and passing intrinsic function as actual
argument without INTRINSIC
Product: gcc
Version: 4.3.0
Status: UNCONFIRMED
Keywords: diagnostic
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: burnus at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33234
