2013-11-03 74 views
0

我想編譯main.f90,它依賴於三個子程序在單獨的文件中。對於第三個子程序,它也有三個子程序。gfortran:編譯分層相關子程序文件的源代碼

  • sub1.f
  • sub2.f
  • sub3_main.f sub3_sub1.f sub3_sub2.f sub3_sub3.f
  • 運行下面的代碼將如下產生長的錯誤消息。

    gfortran main.f90 sub1.f sub2.f sub3_main.f sub3_sub1.f sub3_sub2.f sub3_sub3.f -o- test.exe

    我搜索,發現我可能需要標誌-c,但我不知道有關編譯的命令,再怎麼目標文件鏈接成一個獨立的程序。或者它與這個問題有關:。

    在此先感謝!

    test.exe: In function `_fini': 
    (.fini+0x0): multiple definition of `_fini' 
    /usr/lib/gcc/i686-linux-gnu/4.6/../../../i386-linux-gnu/crti.o:(.fini+0x0): first defined here 
    test.exe: In function `__data_start': 
    (.data+0x0): multiple definition of `__data_start' 
    /usr/lib/gcc/i686-linux-gnu/4.6/../../../i386-linux-gnu/crt1.o:(.data+0x0): first defined here 
    test.exe: In function `__data_start': 
    (.data+0x4): multiple definition of `__dso_handle' 
    /usr/lib/gcc/i686-linux-gnu/4.6/crtbegin.o:(.data+0x0): first defined here 
    test.exe:(.rodata+0x4): multiple definition of `_IO_stdin_used' 
    /usr/lib/gcc/i686-linux-gnu/4.6/../../../i386-linux-gnu/crt1.o:(.rodata.cst4+0x0): first defined here 
    test.exe: In function `_start': 
    (.text+0x0): multiple definition of `_start' 
    /usr/lib/gcc/i686-linux-gnu/4.6/../../../i386-linux-gnu/crt1.o:(.text+0x0): first defined here 
    test.exe:(.rodata+0x0): multiple definition of `_fp_hw' 
    /usr/lib/gcc/i686-linux-gnu/4.6/../../../i386-linux-gnu/crt1.o:(.rodata+0x0): first defined here 
    test.exe: In function `main': 
    (.text+0x399): multiple definition of `main' 
    /tmp/ccwQ3UVQ.o:main.f90:(.text+0x20ee): first defined here 
    test.exe: In function `_init': 
    (.init+0x0): multiple definition of `_init' 
    /usr/lib/gcc/i686-linux-gnu/4.6/../../../i386-linux-gnu/crti.o:(.init+0x0): first defined here 
    /usr/lib/gcc/i686-linux-gnu/4.6/crtend.o:(.dtors+0x0): multiple definition of `__DTOR_END__' 
    test.exe:(.dtors+0x4): first defined here 
    /usr/bin/ld: error in test.exe(.eh_frame); no .eh_frame_hdr table will be created. 
    collect2: ld returned 1 exit status 
    

    回答

    2

    你應該能夠做到之一:

    gfortran -c sub1.f 
    gfortran -c sub2.f 
    gfortran -c sub3_main.f sub3_sub1.f sub3_sub2.f sub3_sub3.f 
    gfortran sub1.o sub2.o sub3_main.o sub3_sub1.o sub3_sub2.o sub3_sub3.o main.f90 -o text.exe 
    

    gfortran sub1.f sub2.f sub3_main.f sub3_sub1.f sub3_sub2.f sub3_sub3.f main.f90 -o text.exe 
    

    您應該只有一個程序和任意數量proceduers(子程序和函數)的。上面假設sub3_main是一個程序,並且你的程序在main.f90中。

    +0

    謝謝@M。 S. B.!你說得對,'sub3_main.f'是一個依賴於'sub3_sub1.f sub3_sub2.f sub3_sub3.f'的過程。但我不知道爲什麼兩種方法都會產生與我以前遇到的相同的錯誤。 – Randel

    +0

    如果你仍然得到相同的錯誤,我想你需要向我們展示一些代碼。你真的在所有文件中都有一個程序嗎?你使用稱爲main的變量嗎? – haraldkl

    +0

    Thanls @haraldkl!我在'main.f90'中只有一個程序,並且在所有文件中都沒有變量'main'。我用以下代碼測試了每組子程序,並且它們可以很好地工作。 'gfortran test_sub1.f90 sub1.f -o- test_sub1.exe','gfortran test_sub2.f90 sub2.f -o- test_sub2.exe','gfortran test_sub3.f90 sub3_main.f sub3_sub1.f sub3_sub2.f sub3_sub3.f - o-test_sub3.exe'。抱歉源代碼亂七八糟,我只能提供抽象文件名。 – Randel