'属性を保存する'とプロパティを扱う際のFortranコンパイラの違いは？

Question

私たちは、インテルのVisual Fortranを使用して再コンパイルしようとしているこの古いFortranスクリプトを持っていますが、コードの古いコンパイルバージョンとは異なる計算エラーと異なる結果を得ています。

以下のコードで問題と思われるものを見つけました（これは数値レシピに由来します）。

問題は、 'it'パラメータが各呼び出しでリセットされることですが、関数呼び出しの間に格納する必要があります。

問題が起きる可能性が最も高いのは、古いコンパイラでは 'それを'保存属性 'として扱い、関数呼び出しの間に保存している可能性があるということです。

ここでは完全に間違っているかもしれませんが、一部のFortran-guruがこれを確認したり、より良い説明をすることができれば、私たちはいくつかの助けを愛するでしょう！

 subroutine TrapezoidalRule(Func, a, b, s, n) 
* 
*  This routine performs the trapezoidal rule, see Numerical Recipes 
* 
     implicit none 
     real*8 Func, a, b, s 
     Integer*4 n 
     external Func 
* 
     real*8 del, x, sum 
     Integer*4 it, tnm, j 
* 
     if (n .eq. 1) then 
* 
     s=0.5d0*(b-a)*(Func(a)+Func(b)) 
     it=1 
* 
     else 
* 
     tnm=it 
     del=(b-a)/dble(tnm) 
     x=a+0.5d0*del 
     sum=0.d0 
     do 11 j=1,it 
* 
      sum=sum+Func(x) 
      x=x+del 
* 
11  continue 
* 
     s=0.5d0*(s+(b-a)*sum/dble(tnm)) 
     it=2*it 
* 
     endif 
* 
     return 
     end 

Answer 1

はい、説明は妥当です。コードは

tnm=it 

でit変数アクセスしitがsaveない場合、この値は不定です。

古いコンパイルではスタックがまったく使用されていない可能性があり、すべての変数に静的ストレージが使用されている可能性があります。スタックを使用している可能性もありますが、上書きされることはなく、値は同じ場所にあることがありました。誰が知っている、我々は知るべき情報を持っていない。

save属性をこのような悪いコードのすべての変数に強制的に設定するコンパイラオプションがあります（すべてがSAVEは決して標準ではありませんでした）。インテルFortranの場合は-saveです。