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

上一篇:Linux MPI+CUDA混编


下一篇:数据结构和算法基础之栈的链式存储