2011-12-26 31 views

答えて

9

これは、条件付きコンパイルと組み合わせて、コマンドラインで "D"オプションを使用して実行できます。ここではいくつかのサンプルコードは、次のとおりです。

program test_Dopt 
character (len=1) :: pathsep 
pathsep = "?" 
#ifdef WOS 
    pathsep = "\" 
#endif 
#ifdef UOS 
    pathsep = "/" 
#endif 

write (*, '("pathsep is >", A1, "<")') pathsep 

end program test_Dopt 

名前のファイルタイプのF90とプログラムがプリプロセッサを実行するか、コンパイル行に-cpp使用するのgfortran引き起こします。次にコンパイル行にDの後にオプションを渡すことで、prepreprocessorにオプションを渡します(例:gfortran -DWOS)。 (これはgfortranより一般的です。ほとんどのFortranコンパイラはCスタイルのプリプロセッサ指令を処理します)。次に、Fortran以外のOSを特定し、その情報をFortranプログラムに渡すことができます。

ファイルタイプF90または-cppを使用してコードをコンパイルできます。

+0

'__unix__'と' _WIN32'は、ほとんどのコンパイラでどのシステムを使用しているかを示すために使われる、あらかじめ定義されたプリプロセッサフ​​ラグです。 – Chris

関連する問題