首先先说明一下题目把,为什么Fortran调用的是C动态库而不是C++?
C语言函数库的调用和C++函数库的调用是不一样的,其不同主要是由于C++相较于C的特性造成的。
举个栗子,C语言中一个函数名只能代表一个函数,C++中由于函数重载的存在一个函数名并不能唯一确定一个函数。
因此在调用函数库时也就注定着C和C++必定有所区别。
而Fortran是基于C标准的,所以只能调用C的动态库。(如果必须用C++编译器编译的话,可以加入extern “C”,确保特定函数使用C规则编译)
编译C动态链接库
首先在VS中新建动态链接库项目,添加.c文件(如果是cpp编译出来就不是C动态库了)
#include <stdio.h>
_declspec(dllexport) void _cdecl MYPRINT(double *x)
{
printf("%lf",*x);
}
这里需要注意的一点就是堆栈管理规则
_stdcall:参数由右向左压入堆栈,堆栈由函数自己清理。
_cdecl:参数由右向左压入堆栈,堆栈由调用方清理。
msvc都是默认_stdcall的堆栈管理规则,Fortran是_cdecl,因此在输出函数库时应显式设置它。
对于编译生成的.lib和.dll的作用这里做一下简单的介绍:
.lib是用来编译使用的,用来说明库里有什么东西去哪里找
.dll就是你要找的那个东西
在编译过程中,只需要知道去哪里找就够了,等到程序运行的时候才需要dll出来干活
因此,如果不想额外添加路径的话,只需要将.lib复制到项目根目录,.dll复制到可执行文件的同级目录之下就可以了。
Fortran调用C动态链接库
在项目->属性->链接器->输入->附加依赖项 中加入需要调用的lib文件
program callcfunction
implicit none
interface
function MYPRINT(x) bind(c,name='MYPRINT')
use,intrinsic::iso_c_binding
real(8)::x
end function
end interface
real(8)::x
real(4)::result
x=3.1415
result = MYPRINT(x)
end program
注意:调用方的程序位数与版本需要与库保持一致
今天的文章Fortran调用C动态链接库分享到此就结束了,感谢您的阅读,如果确实帮到您,您可以动动手指转发给其他人。
版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 举报,一经查实,本站将立刻删除。
如需转载请保留出处:https://bianchenghao.cn/28946.html