24小时热门版块排行榜    

CyRhmU.jpeg
查看: 651  |  回复: 4

zhao_xh

银虫 (小有名气)

[求助] 求助关于module相关的问题

请问各位大虾,请教个问题。我的程序结构是这样的:
module mod1
use mod2
…………
subroutine sub1()
call sub2()
end subroutine
end mod1

module mod2
subroutine sub2()
…………
end subroutine
end mod2

program
……
end
编译时出现Error: The name of the module procedure conflicts with a name in the encompassing scoping unit. 这样的错误,请问是怎么回事?如何解决?
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

Carpathia

银虫 (小有名气)

【答案】应助回帖

感谢参与,应助指数 +1
module里面的subroutine要有contains
追求理想的道路上东张西望
2楼2012-06-07 22:06:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhao_xh

银虫 (小有名气)

引用回帖:
2楼: Originally posted by Carpathia at 2012-06-07 22:06:43
module里面的subroutine要有contains

我程序里有加contains
3楼2012-06-08 10:19:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

Carpathia

银虫 (小有名气)

模块子程序名字重新取一个吧
追求理想的道路上东张西望
4楼2012-06-08 12:47:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

感谢参与,应助指数 +1
end subroutine
end mod1

改为
end subroutine sub1
end module mod1

另外,module 里面也要用 contains
5楼2012-06-10 10:00:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 zhao_xh 的主题更新
信息提示
请填处理意见