链接C ++和Fortran时出现重复符号

Question

链接fortran和C ++代码时出现重复的符号错误，我不知道为什么。

我有以下fortran代码simple.f90：

module foo
    use iso_c_binding
    integer(kind=c_int) :: bar
end module foo

subroutine print()
    use foo
    write(*,*) bar
end subroutine print

并且我有以下C ++驱动程序main.cpp

extern "C"
{
  int __foo_MOD_bar;
  void print();
}


int main()
{
  __foo_MOD_bar = 42;
  print();
  return 0;
}

我想做的是将模块foo / bar变量分配给一个值，然后从Fortran子例程中打印它。

但是，当我编译和链接时

gfortran -std=f2003 -fno-underscoring -c simple.f90
g++ -c main.c
gfortran main.o gfortran.o -o out

我收到重复的符号错误

[100%] Linking CXX executable out
duplicate symbol '___foo_MOD_bar' in:
    CMakeFiles/out.dir/main.cpp.o
    CMakeFiles/out.dir/simple.f90.o
ld: 1 duplicate symbol for architecture x86_64

 nm simple.f90.o
00000000000000f8 s EH_frame1
00000000000004cc S ___foo_MOD_bar
                 U __gfortran_st_write
                 U __gfortran_st_write_done
                 U __gfortran_transfer_integer_write
0000000000000000 T _print
0000000000000078 s lC0

nm main.cpp.o
0000000000000388 S ___foo_MOD_bar
0000000000000000 T _main
                 U _print

我有点茫然

Answer 1

您的int __foo_MOD_bar;定义了一个变量，而不仅仅是声明了它（因为extern "C"块仅更改链接），并且Fortran代码大概也是如此。尝试将明确的extern说明符添加到变量本身，例如：

extern int __foo_MOD_bar;

（[extern "C" int __foo_MOD_bar;应该在extern "C"块的内部或外部也可以与IIRC一起使用。

或者，您也可以在Fortran部分中用声明替换变量定义，但我不知道该语言，因此无法解释如何使用。

Answer 2

[将extern "C"与块一起使用时，块内的变量定义不会获得外部存储类处理。这种行为有一个很好的理由，例如

extern "C" {
#include <some_c_lib.h>
}

使C头文件在C ++中可用。如果extern "C" { ... }将所有变量定义修改为外部声明，则可能会发生不良情况。