fortran 调试时如何处理条件语句

rachel

[Fortran] 纯文本查看 复制代码

integer dim
parameter (dim=2)
double precision  dvx(dim), x, y, z

if(dim .eq. 1) then
    x=2.0+dvx(1)
elseif(dim.eq.2) then
    x=2.0+dvx(1)
    y=2.0+dvx(2)
else
    x=2.0+dvx(1)
    y=2.0+dvx(2)
    z=2.0+dvx(3)
endif

stop
end

debug下提示错误：
I:\visual studio 2010\test\test\Source1.f90(13): error #5560: Subscript #1 of the array DVX has value 3 which is greater than the upper bound of 2
但release运行无错误
求高人指教，用得是ivf编译器1. 程序可以处理3维问题，但我这里只用于解决2维问题，所以dim设为2，“z=2.0+dvx(3)
”应该不执行的呀
2. 在cvf下可以顺利通过调试

rachel

也不是错误，cvf下就不会错误，主要是编译时不会判断，if的两条语句都运行就出现错误了