使用-mcmodel=medium编译OpenMP Fortran程序遇段类型冲突错误

编译错误原因 #

-mcmodel=medium是GCC用于支持大内存寻址的选项（当全局/静态数据超过2GB时启用），但在GCC 11.3.0的Fortran编译器中，该模式下对非COMMON块变量的段分配逻辑存在bug：

• 即便profs和sur名称、维度不同，只要其中一个被编译器判定为大内存变量（比如数组维度大、占用内存高），会被分配到medium模式专属的大内存段；另一个变量则可能因隐式SAVE属性（Fortran默认给模块变量、子程序内静态变量加SAVE）或优化逻辑，被分配到普通小内存段，二者段类型不兼容就会触发冲突错误。

多线程崩溃原因 #

不加-mcmodel=medium编译正常但多线程崩溃，本质是线程栈内存不足：OpenMP每个线程都有独立栈空间，默认栈大小（通常几MB）放不下你代码里的大局部数组，导致栈溢出崩溃。注意-mcmodel=medium是针对全局/静态数据的，根本解决不了栈内存的问题。

可行解决办法 #

1. 解决栈溢出问题：
   • 编译时添加-fstack-size=16777216（数值为字节数，这里是16MB，可根据需求调整）；
   • 或者运行前设置环境变量：export OMP_STACKSIZE=16M（bash环境下）。
2. 若确实需要处理大全局数组：
   • 给profs和sur加上ALLOCATABLE属性，改为动态分配内存，避免静态分配导致的段冲突；
   • 升级GCC到12.x及以上版本，该版本修复了medium模式下的段分配bug。

内容的提问来源于stack exchange，提问作者DJNZ