gfortran -std=f95 -pedantic -Wall -fall-intrinsics
gfortran.dg/char_result_7.f90
Compiles, but as g95 remarks:
Error: Specification function 'fn' at (1) must be PURE
which NAG f95 confirms:
Error: Reference to non-specification function FN in specification
and ifort joins in as well:
An explicit interface is required for a specification function. [FN]
Excerpt of that file (see testsuite for the full program):
function f2 (fn, i)
integer :: i, fn
character (len = fn (i)) :: f2
Called as "f2 (double, 70)" where DOUBLE is pure.
--
Summary: Missing check: specification function must be pure
Product: gcc
Version: 4.3.0
Status: UNCONFIRMED
Keywords: accepts-invalid
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=33230
