gfortran + msmpi 在windows上编译并行程序

近期在构建一个并行程序时，踩了好几个坑，现在记录下来，用于以后查阅，如有错误的地方，请指正。

由于需要构建在windows下运行的程序，所以使用mingw进行编译。

在make过程中，报出以下错误：

function 'int_ptr kind' in initialization expression at (1) must be an instrinsic function

经查阅资料，发现是msmpi的问题，需要对其文件进行修改：

首先从msmpi安装目录拷贝mpifptr.h、mpi.f90到临时创建的文件夹中，然后再从系统目录System64文件夹中拷贝msmpi.dll到该文件夹中（如果电脑是32位的，则从System32中拷贝），拷贝完成后，将mpi.f90重命名为mpi.F90，在该文件夹下打开cmd.exe，按顺序输入以下命令：

gfortran -c -D INT_PTR_KIND()=8 -fno-range-check mpi.F90

gendef msmppi.dll

dlltool -d msmpi.def -l libmsmpi.a -D msmpi.dll

执行完毕后，会在该文件夹下发现生成了libmsmpi.a文件，将该文件拷贝到msmpi的Lib/x64目录下

上述操作完成后，进入msmpi安装目录的include目录下，修改mpi.h文件：

找到 typedef __int64 MPI_Aint，在这句之前添加#include <stdint.h>

接着修改mpif.h文件，找到 INT_PTR_KIND()，将其替换为 z'8c00008'，注意，这里是我个人找出的办法，由于项目采用cmake进行配置，我在GFORTRAN_COMPILE_FLAG添加-D INT_PTR_KIND()=8没有效果，故直接修改该文件，请慎用

在这些配置弄完后，编译仍然会报错：无法将integer(16)转换为integer(4)，

这个错误可以通过添加 指令： -fno-range-check屏蔽这个错误。

​

 引用文章：

windows下利用Mingw和msmpi编译运行mpi并行程序

TUTORIAL: Adapting MS-MPI for MinGW64

mpi + gcc + gfortran on windows

​

标签：msmpi,并行程序,mpi,windows,文件夹,拷贝
来源： https://www.cnblogs.com/fengye2021/p/15362799.html