FORTRAN “ multiple definition of `MAIN__'”

最新推荐文章于 2025-07-28 17:09:01 发布

原创最新推荐文章于 2025-07-28 17:09:01 发布 · 4.5k 阅读

1 ·

CC 4.0 BY-SA版权

文章标签：

#fortran #reference #function #parallel #ie #c

FORTRAN 专栏收录该内容

21 篇文章

订阅专栏

解决FORTRAN程序在使用mpif90编译时出现的‘multiple definition of `MAIN__'’错误。该问题通常由代码中多余的end语句引起。

编译FORTRAN程序时，出现错误信息：“ multiple definition of `MAIN__'”

[root@c0108 parallel]# mpif90 -o simple stagsimple.F solveuss.F solvevss.F solvewss.F ppoisson.F tdma.F /tmp/ccMt8rzo.o: In function `MAIN__': tdma.F:(.text+0x820): multiple definition of `MAIN__' /tmp/ccZDnM6W.o:stagsimple.F:(.text+0x0): first defined here /usr/bin/ld: Warning: size of symbol `MAIN__' changed from 16639 in /tmp/ccZDnM6W.o to 2690 in /tmp/ccMt8rzo.o /tmp/ccMt8rzo.o: In function `MAIN__': tdma.F:(.text+0x9ff): undefined reference to `p_' tdma.F:(.text+0xa37): undefined reference to `req_receive_' tdma.F:(.text+0xb5c): undefined reference to `p_' tdma.F:(.text+0xe83): undefined reference to `p_' tdma.F:(.text+0xf72): undefined reference to `p_' tdma.F:(.text+0x108f): undefined reference to `p_' tdma.F:(.text+0x11fc): undefined reference to `p_' tdma.F:(.text+0x1297): undefined reference to `req_receive_'

遇到这种问题，先检查一下代码中，有没有多余的end

比如说，我的错误的子例行程序:

!tdma.F

SUBROUTINE TDMAP(IB,IE,JB,JE,KB,KE,P,SP,AA,AE,AW,AN,AS,AT,AB,

& myid,mykb,myke)

...

end

...

end

更多信息可参考邮件列表：http://gcc.gnu.org/ml/gcc-help/2003-12/msg00252.html