Fortran Coder

查看: 417|回复: 2

[IDE] Simply Fortran开启数组越界检查

[复制链接]

2

帖子

1

主题

0

精华

新人

F 币
30 元
贡献
13 点
发表于 2021-7-17 18:47:10 | 显示全部楼层 |阅读模式
[Fortran] 纯文本查看 复制代码
program ex0912
    implicit none
  Real(kind=4),    Allocatable :: A(:)
  Integer(kind=1), Allocatable :: B(:)
  Allocate(A(10))
  Allocate(B(20))
  A=10
  B=20
  A(-20)=1
  B(-1000)=100
  write(6,*)A(:)
  write(6,*)A(20)
  write(6,*)B(:)
  write(6,*)B(-1000)
  stop
  end program

微信图片_20210717184606.png

有点困惑,用SIMPLY FORTRAN 编译上述代码,为何还能运行?

回复

使用道具 举报

624

帖子

4

主题

0

精华

大师

农村外出务工人员

F 币
395 元
贡献
139 点

新人勋章爱心勋章水王勋章元老勋章

发表于 2021-7-17 22:43:00 | 显示全部楼层
默认情况下,不会进行越界检查。
你可以在这里设置 -fcheck=bounds ,让编译器进行越界检查。

如图, Project 菜单 , Options...:
捕获.PNG

2

帖子

1

主题

0

精华

新人

F 币
30 元
贡献
13 点
 楼主| 发表于 2021-7-18 08:42:17 | 显示全部楼层
非常感谢,解决了。高手。
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

QQ|捐赠本站|Archiver|关于我们 About Us|群聊|Fcode

GMT+8, 2021-9-24 10:51

Powered by Discuz! X3.2

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表