求帮助，if语句的编译问题与条件编译

wengxi · 发表于 2015-5-14 11:06:39

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

REAL X,M(1,3)
!READ*,X
X=1
IF (X<0) M(2,3)=2.0
IF (X<2) X=2.2
PRINT*,X
END

Error       1       error #5560: Subscript #1 of the array M has value 2 which is greater than the upper bound of 1       E:\programme\test\test\Source1.f90       6
问题描述：请问Fortran90的语言或者编译器对判断语句为false的执行部分是否会编译？我觉得如果if判断为假，其对应的执行部分将会自动跳跃，不会报错，更不会编译。
               图上所示，X的值第一个（X<0）是不会执行的，但是，后面的语句报错，表示编译的时候还是执行了的，这个不能理解，是语言问题，还是我编译器的问题？
               谢谢！

vvt · 发表于 2015-5-14 12:09:12

判断语句的路线要到执行时才能确定。编译时无法确定。所以都会编译。

wengxi · 发表于 2015-5-14 13:05:26

也就是说fortran语言在编译时会对所有的语句（包括将来不执行的）进行类型和脚标的编译，现在如果我的程序要避免这个，有什么办法可以让他不对其编译。具体地说，我设置了多个开关，而在我这套开关的情况下会和别的开关不执行的语句想矛盾，可以解决的办法是什么？在不删去、注释的办法下，可以让他不编译或者直接跳过编译运行吗？

wengxi · 发表于 2015-5-14 13:06:07

vvt 发表于 2015-5-14 12:09
判断语句的路线要到执行时才能确定。编译时无法确定。所以都会编译。

谢谢，我又追问了一下。

楚香饭 · 发表于 2015-5-14 13:08:55

条件编译。这个具体要看你使用什么编译器。比如 Intel fortran 的话。

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

!DIR$ DEFINE testflag
!DIR$ IF DEFINED (testflag)
   write (*,*) 'Compiling first line'
!DIR$ ELSE
   write (*,*) 'Compiling second line'
!DIR$ ENDIF!DIR$ UNDEFINE testflag

wengxi · 发表于 2015-5-14 23:06:17

请问一下，我觉得我没有做什么，怎么变成这个样子，题目也改变了，然后还采纳了。

fcode · 发表于 2015-5-15 08:29:22

为了方便主题归类和后人搜索方便，我会对已解决的问题做适当的调整（在不改变发帖人意愿的前提下，做包括“修改帖子标题”，“排版帖子内代码”等）

这里不是百度知道，所以不存在“采纳”一说。而是管理人员标记这个主题为“已解决”，并不会有任何回答者因此而“受益”，也不影响这个帖子继续讨论和回复，也仅仅是出于分类管理的目的。

pasuka · 发表于 2015-5-15 08:55:28

lz这个不是典型的数组越界嘛！

wengxi · 发表于 2015-5-15 16:10:24

pasuka 发表于 2015-5-15 08:55
lz这个不是典型的数组越界嘛！

你说的很对，我的数组却是越界了。但是这个越界的地方应该是不执行的，所以是可以继续执行的。

wengxi · 发表于 2015-5-16 12:52:10

fcode 发表于 2015-5-15 08:29
为了方便主题归类和后人搜索方便，我会对已解决的问题做适当的调整（在不改变发帖人意愿的前提下，做包括“ ...

十分感谢。另外说一句，我不介意受益与否，毕竟别人帮了我，没问我要钱已经很好了。

[流程控制] 求帮助，if语句的编译问题与条件编译

规矩勋章

元老勋章

新人勋章

水王勋章

热心勋章

爱心勋章

美女勋章

星光勋章

贡献勋章

管理勋章

帅哥勋章