Fortran Coder

查看: 6794|回复: 2
打印 上一主题 下一主题

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

[复制链接]

80

帖子

26

主题

0

精华

专家

F 币
280 元
贡献
150 点
跳转到指定楼层
楼主
发表于 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



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

分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

718

帖子

4

主题

0

精华

大师

农村外出务工人员

F 币
632 元
贡献
323 点

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

沙发
发表于 2021-7-17 22:43:00 | 只看该作者
默认情况下,不会进行越界检查。
你可以在这里设置 -fcheck=bounds ,让编译器进行越界检查。

如图, Project 菜单 , Options...:


80

帖子

26

主题

0

精华

专家

F 币
280 元
贡献
150 点
板凳
 楼主| 发表于 2021-7-18 08:42:17 | 只看该作者
非常感谢,解决了。高手。
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-11-1 09:04

Powered by Tencent X3.4

© 2013-2024 Tencent

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