C++调用Fortran静态库中的函数

fcode

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

subroutine add(a, b, sum) Bind(C,Name="ADD")
real(8) a
real(8) b
real(8) sum

sum = a + b
end

fcode

不修改fortran的话，就修改C++的符号名，但是这可能因为不同编译器的符号修饰不同，而导致代码不通用。

请看如下截图，根据 nm 获得符号名。再对应修改 cpp 代码即可。