Fortran Coder

查看: 22668|回复: 9
打印 上一主题 下一主题

[求助] 现在的fortran语言标准是否支持获得操作系统名称

[复制链接]

798

帖子

2

主题

0

精华

大宗师

F 币
3793 元
贡献
2268 点
楼主
发表于 2019-12-22 20:12:03 | 显示全部楼层
只能靠预处理,ivf可以这么用
!DIR$ if defined (_WIN32)

798

帖子

2

主题

0

精华

大宗师

F 币
3793 元
贡献
2268 点
沙发
发表于 2019-12-23 11:13:05 | 显示全部楼层
!DIR$ if defined (_WIN32)
character(*),parameter::OS='win'
!DIR$ else
character(*),parameter:: os='linux'
!DIR$ end if

798

帖子

2

主题

0

精华

大宗师

F 币
3793 元
贡献
2268 点
板凳
发表于 2019-12-23 11:21:36 | 显示全部楼层
http://fcode.cn/guide-109-1.html预处理

QQ截图20191223112119.png (14.22 KB, 下载次数: 367)

QQ截图20191223112119.png
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

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

GMT+8, 2024-5-4 22:14

Powered by Tencent X3.4

© 2013-2024 Tencent

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