Fortran模块编译为.o文件后链接出现undefined reference错误的疑难排查

这个问题的核心在于Fortran模块中私有实体的符号导出规则，以及分开编译和联合编译的差异：

为什么分开编译会报错？ #

你的模块LSQregression中，LSQestimate_simple和LSQestimate_using这两个函数默认是私有实体（模块内未显式声明为public）。虽然它们被包含在公共的通用接口LSQestimate中，但Fortran的规则是：通用接口本身是公共的，不代表接口内的具体过程会自动变为公共的。

当你单独编译模块为.o文件时，gfortran会分析模块内部的依赖：

• LSQestimate_simple仅被模块内的私有函数LSQdecision调用（LSQdecision也未声明为public）；
• 编译器认为这个函数不需要被模块外部的代码访问，因此不会将它的符号（__lsqregression_MOD_lsqestimate_simple）导出到.o文件的符号表中。

而你的主程序通过通用接口LSQestimate调用LSQestimate_simple时，编译主程序会生成对该符号的引用，链接阶段找不到这个符号就会报错。

为什么联合编译没问题？ #

当你用一条命令同时编译模块和主程序时，它们属于同一个编译单元。编译器可以直接看到LSQestimate_simple的定义，不需要依赖符号表导出就能解析主程序的调用，因此不会出现链接错误。

解决方案：显式声明过程为公共实体 #

要解决这个问题，你需要在模块中显式将LSQestimate_simple（以及LSQestimate_using，如果后续会用到）声明为public，确保编译器将它们的符号导出到.o文件中。修改模块的开头部分：

module LSQregression
    implicit none
    ! 显式声明所有需要外部访问的实体
    public :: LSQbeta, LSQestimate, LSQdecision, &
              LSQbeta_simple, LSQbeta_using, &
              LSQestimate_simple, LSQestimate_using
    interface LSQbeta
        procedure LSQbeta_simple, LSQbeta_using
    end interface LSQbeta
    interface LSQestimate
        procedure LSQestimate_simple, LSQestimate_using
    end interface LSQestimate
contains
    ! ... 原有函数定义保持不变 ...
end module LSQregression

如果你确定只需要LSQestimate_simple被外部访问，也可以只添加它：

public :: LSQbeta, LSQestimate, LSQestimate_simple

验证修改效果 #

重新编译模块：

gfortran -c ../LSQregression.f90

然后用nm命令查看符号表，你会发现__lsqregression_MOD_lsqestimate_simple已经出现在列表中，此时再链接主程序就不会报错了。

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