含interface代码转dll的问题

andy8496

[Fortran] 纯文本查看 复制代码

module test_mod
   interface call_test
     module procedure call_test_int
     module procedure call_test_real
   end interface
 contains

 subroutine call_test_int()
 !dec$ attributes dllexport , ALIAS:"call_test_int"::call_test_int
   return
 end subroutine

 subroutine call_test_real()
 !dec$ attributes dllexport , ALIAS:"call_test_real"::call_test_real
   return
 end subroutine

 end module

请教：现在要把这个文件做成dll.现在要call_test也能被调用，应该怎么写啊？

百事可乐

这个，我想，做不到。
编译器对 generic function 到  specified function 的自动转换，是发生在编译时。而不是运行时。

而 DLL 调用只能在运行时。

andy8496

那我还是老老实实的用原始的名字吧。谢谢了！

pasuka

可以的，用C++的模板调用Fortran的subroutine即可，就看lz是否怕麻烦了

楚香饭

pasuka 发表于 2015-4-7 08:57
可以的，用C++的模板调用Fortran的subroutine即可，就看lz是否怕麻烦了

那 fortran 的 dll 也得导出两个函数 call_test_int 和 call_test_real 才行。

pasuka

楚香饭 发表于 2015-4-7 09:29
那 fortran 的 dll 也得导出两个函数 call_test_int 和 call_test_real 才行。

是的，可以C++、Fortran混合编程，封装到一个动态链接库
fortran代码定义两个函数call_test_int 和call_test_real
C++代码用模板定义call_test
不想用C++的话，可以用C，参考printf函数的方法
只是，这么操作实在多此一举，实践中应当回避或者统筹优化

andy8496

谢谢！我还是喜欢单独用Fortran.当时是因为好玩儿才弄了这个interface，大部分调用还是用的原来的名字，剩下的稍微改下就好了，工作量不大。
再次谢谢各位了！