C++ 和 Fortran 混合链接问题

我在网上做了一些搜索，但我找不到如何从 Linux 编译简单的 C++ 和 Fortran 代码。我需要让它变得复杂，但我只需要知道如何从一个简单的例子开始。

我的C++代码是这样的：

#include <iostream>
using namespace std;

extern int Add( int *, int * );
extern int Multiply( int *, int * );

int main()
{
    int a,b,c;  
    cout << "Enter 2 values: ";
    cin >> a >> b;

    c = Add(&a,&b);
    cout << a << " + " << b << " = " << c << endl;
    c = Multiply(&a,&b);
    cout << a << " * " << b << " = " << c << endl;
    return 0;
}

我的 Fortran 代码是这样的：

integer function Add(a,b)
    integer a,b
    Add = a+b
    return
end


integer function Multiply(a,b)
    integer a,b
    Multiply = a*b
    return
end

我在用ifort编译我的 Fortran 代码和 g++ 来编译 C++ 代码。我尝试过这个终端命令：

$ ifort -c Program.f90
$ g++ -o Main.cpp Program.o

但我收到的错误是“链接器输入文件未使用，因为链接未完成。” 我不知道如何将两者联系在一起。如果有人可以帮助我，我将不胜感激！

PS-我尝试添加-lg2c在我的编译行的末尾，它不被识别。

这里有一些问题不让对象的名称匹配。首先，在 C++ 代码中指定外部函数具有 C 签名：

在测试.cpp中：

extern "C" int Add( int *, int * );
extern "C" int Multiply( int *, int * );

See 在C++源码中，extern "C" 的作用是什么？ https://stackoverflow.com/questions/1041866/in-c-source-what-is-the-effect-of-extern-c更多细节。

在 Fortran 代码中，通过在模块中放置过程来使接口显式化，并使用iso_c_binding让 Fortran 对象显示为有效的 C 对象。请注意，我们可以通过以下方式显式指定 C 或 C++ 程序将看到的对象的名称：bind关键词：

测试_f.f90：

module mymod
use iso_c_binding
implicit none

contains

integer(kind=c_int) function Add(a,b) bind(c,name='Add')
    integer(kind=c_int) :: a,b
    Add = a+b
end function

integer(kind=c_int) function Multiply(a,b) bind(c,name='Multiply')
    integer(kind=c_int) :: a,b
    Multiply = a*b
end function

endmodule mymod

编译（别介意我使用Intel套件，我的g++和gfortran已经很老了）：

$ ifort -c test_f.f90 
$ icpc -c test.cpp 

Link:

$ icpc test_f.o test.o

执行中a.out现在应该按预期工作。