ifc error?

From: Bastiaan Braams (braams_at_courant.nyu.edu)
Date: 06/19/04


Date: 19 Jun 2004 13:26:31 -0700

What to make of this?

> cat foo.f90
program foo
integer, parameter :: ind(0:0)=(/ 0 /)
if (2.le.size(ind)) then
 write (*,*) ind(1)
endif
stop
end

> ifc foo.f90
   program FOO
 write (*,*) ind(1)
                 ^
Error 173 at (4:foo.f90) : Array element subscript is not within array bounds
1 Error
compilation aborted for foo.f90 (code 1)

There is nothing wrong with foo that I can see.

> ifc -V
Intel(R) Fortran Compiler for 32-bit applications, Version 6.0
Build 020609Z

Bas Braams