您所在位置：主题：[讨论]module 里面封装的程序的形参能是指针类型的吗？
shiyongjie11
[专家分：0] 发布于 2010-09-23 23:17:00
问题描述如下：
在module 里定义个一个子程序。如
module aa
contains
subroutine test(a,pointer)
..................
.......................
end subroutine
end module
当我在主程序main中调用子程序test的时候，需要使用use aa，use是显示定义接口的。而fortran规定使用指针作为函数指针时，必须使用interface 。即在主程序中必须使用
interface
subroutine test
end interface
这样一来，又是use，又是interface，两次定义了接口，就出错了。
请问各位有什么办法来解决这个问题。前提是test必须封装在module里，而且形参必须是指针类型。
本文来自: 小木虫论坛 http://emuch.net/bbs/viewthread.php?tid=2427785&fpage=1
在module 里定义个一个子程序。如
module aa
contains
subroutine test(a,pointer)
..................
.......................
end subroutine
end module
当我在主程序main中调用子程序test的时候，需要使用use aa，use是显示定义接口的。而fortran规定使用指针作为函数指针时，必须使用interface 。即在主程序中必须使用
interface
subroutine test
end interface
这样一来，又是use，又是interface，两次定义了接口，就出错了。
请问各位有什么办法来解决这个问题。前提是test必须封装在module里，而且形参必须是指针类型。
本文来自: 小木虫论坛 http://emuch.net/bbs/viewthread.php?tid=2427785&fpage=1