Fortran Coder

查看: 1194|回复: 4
打印 上一主题 下一主题

[求助] Fortran程序编译后拖入文件立刻闪退问题

[复制链接]

13

帖子

4

主题

0

精华

入门

F 币
64 元
贡献
30 点
跳转到指定楼层
楼主
发表于 2024-1-18 15:38:35 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
本帖最后由 Yjc 于 2024-1-18 15:53 编辑

各位老师们好,我在学习Fortran程序时遇到一个问题,我想把写在文件里的一个自由格式的矩阵进行格式化后输出在屏幕上,以下是我的源代码GaussFmtMat.f90。在Codeblocks中利用gfortran编译器编译完成后,运行exe程序,一旦向其中拖入mat.txt,程序立刻闪退,在编译器中运行时还有以下提示:
||=== Build file: "no target" in "no project" (compiler: unknown) ===|
||Warning: Nonexistent include directory 'D:\Documents\Fortran_Exercise\GaussFmtMat.os_output_dir' [-Wmissing-include-dirs]|
||=== Build finished: 0 error(s), 1 warning(s) (0 minute(s), 0 second(s)) ===|

At line 32 of file D:\Documents\Fortran_Exercise\GaussFmtMat.f90 (unit = 10, file = 'D:\Documents\Fortran_Exercise\mat.txt')Fortran runtime error: End of file


Error termination. Backtrace:


Process returned 2 (0x2)   execution time : 10.853 s


请问为什么会导致这个问题?应该怎么解决呢?谢谢各位老师指点!


GaussFmtMat.f90 (1.71 KB, 下载次数: 3) mat.txt (171 Bytes, 下载次数: 1)





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

835

帖子

2

主题

0

精华

大宗师

F 币
3926 元
贡献
2334 点
沙发
发表于 2024-1-18 17:29:24 | 只看该作者
[Fortran] 纯文本查看 复制代码
do i=1,ndim,1
	do j=1,ndim,1
		read(10,*) mat(i,j)
	end do
end do
!改为
do i=1,ndim,1
		read(10,*) mat(i,:)
end do

13

帖子

4

主题

0

精华

入门

F 币
64 元
贡献
30 点
板凳
 楼主| 发表于 2024-1-18 17:44:09 | 只看该作者
li913 发表于 2024-1-18 17:29
[mw_shl_code=fortran,true]do i=1,ndim,1
        do j=1,ndim,1
                read(10,*) mat(i,j)

谢谢老师解答,这样在编译器中确实可以运行了,但是如果直接运行编译产生的GaussFmtMat.exe,在输入前面三个信息之后还是会产生闪退问题,这又是什么原因呢?谢谢!

2033

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1641 元
贡献
709 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

地板
发表于 2024-1-19 08:13:21 | 只看该作者
一般是文件路径问题,可以尝试在命令行中运行,可以看到错误提示。http://1shan.w.fcode.cn

13

帖子

4

主题

0

精华

入门

F 币
64 元
贡献
30 点
5#
 楼主| 发表于 2024-1-20 10:55:52 | 只看该作者
fcode 发表于 2024-1-19 08:13
一般是文件路径问题,可以尝试在命令行中运行,可以看到错误提示。http://1shan.w.fcode.cn
...

谢谢老师解答,问题已经解决了;是因为没在程序末尾加read(*,*),导致程序运行结束直接退出了
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

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

GMT+8, 2024-12-23 17:53

Powered by Tencent X3.4

© 2013-2024 Tencent

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