Reported at
http://groups.google.com/group/comp.lang.fortran/browse_thread/thread/100b8994f011019b/
The following program is rejected with:
bar.f90:5.17:
dimension a(abs(mode)),b(int(dis))
1
Error: 'a' argument of 'abs' intrinsic at (1) must be a numeric type
bar.f90:5.30:
dimension a(abs(mode)),b(int(dis))
1
Error: 'a' argument of 'int' intrinsic at (1) must be a numeric type
-------------
program testprog
call mysub1((/-2.0/), (/3.2/),-1, 1.0)
contains
subroutine mysub1(a,b,mode,dis)
dimension a(abs(mode)),b(int(dis))
write (*,*) abs(mode), nint(dis)
end subroutine
end program
--
Summary: Rejected: implicitly-typed dummys used in initialization
expressions
Product: gcc
Version: 4.3.0
Status: UNCONFIRMED
Keywords: rejects-valid
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=31222
