f95 コンパイラは、Fortran 2003 VALUE 型の宣言属性を受け入れます。
この属性とともに副プログラムのダミー入力引数を指定すると、実際の引数は「値」によって渡されます。次の例では、リテラル値を引数とする Fortran 95 副プログラムを呼び出す C 言語の主プログラムにおいて VALUE 属性を使用しています。
C コード: #include <stdlib.h> int main(int ac, char *av[]) { to_fortran(2); } Fortran コード: subroutine to_fortran(i) integer, value :: i print *, i end |