Fortran Coder

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

[求助] 关于程序调用问题?

[复制链接]

28

帖子

4

主题

0

精华

熟手

F 币
134 元
贡献
72 点
跳转到指定楼层
楼主
发表于 2020-5-30 21:12:48 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
在学习一个可执行的F77编写的代码,环境为LINUX。代码这一段我很疑惑,如图,求助:在这个代码的所有文件目录下,我根本找不到RDBUF和WRTBUF这两个函数,而这两个函数是用来读写数据的。
很奇怪的是整个代码编译后,运行起来一切正常,计算结果也OK。
我想知道的是这2个函数找不到对应的*.f文件,怎么能够完美运行的?在哪里能找到这个?



1.png (42.16 KB, 下载次数: 200)

1.png
分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

28

帖子

4

主题

0

精华

熟手

F 币
134 元
贡献
72 点
沙发
 楼主| 发表于 2020-5-30 22:17:16 | 只看该作者
找到了,使用了ENTRY入口,还在跟踪,有问题再请教大家!

28

帖子

4

主题

0

精华

熟手

F 币
134 元
贡献
72 点
板凳
 楼主| 发表于 2020-5-30 22:54:58 | 只看该作者
请教,一步一步调式顺序按图1、2、3、4所示:
图1中,makept.f下断点到WRTBUF,下一步
图2中,到达opnbuf.f中,到达ENTRY WRTBUF(LGV,L0,W,X,J,NM), 按我的料想继续下一步,应该执行到NN1=NN+80,也就是下一行,但是并不是这样。执行下一步到图3
图3中,却到了makept.f函数入口处,继续下一步,如图4
图4中,直接到了LCOUNT=LCOUNT+1这里。

为什么没有执行ENTRY WRTBUF(LGV,L0,W,X,J,NM)的内容呢,很疑惑?

1.png (164.47 KB, 下载次数: 232)

1.png

2.png (136.18 KB, 下载次数: 220)

2.png

3.png (157.18 KB, 下载次数: 221)

3.png

4.png (157.14 KB, 下载次数: 221)

4.png
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

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

GMT+8, 2024-11-15 07:07

Powered by Tencent X3.4

© 2013-2024 Tencent

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