この警告は、オプションの仮引数が非オプション引数の前に宣言されている場合にレポートされます (FORTRAN のみ)。
この場合、呼び出し元が、呼び出しごとに明示的に引数名を指定しなければならないため、推奨されていません。
ID |
問題箇所 |
説明 |
---|---|---|
1 |
定義 |
仮パラメーターの定義 |
subroutine mysub(i,j) ! optional argument "i" is before nonoptional argument "j" integer, optional :: i integer :: j if (present(i)) print *,i print *,j end integer :: k interface subroutine mysub(i, j) integer, optional :: i integer :: j end subroutine mysub end interface read *,k call mysub(k, k) call mysub(j=k) end
© 2010 Intel Corporation. 無断での引用、転載を禁じます。