Orz日記 by Akio Morita

_ [SAD]インデックスマジックナンバー

Elementパラメータ参照コードからマジックナンバーを除去するには、 一般にはkytblを参照する必要があるが、特定のElement実装に 対するkytblの内容はコンパイル時もしくはElement実装の 登録時点で確定しているので、呼び出し毎に間接参照を行なう必要は無い。

Cだと、enum型でインデックス定数を生成する若しくは、 関数スコープの static const変数の初期化式が初回呼び出し時に 排他的に評価されることを使って、サブルーチン内のテーブル参照を ローカルなstatic変数の参照に置換する(インデックス計算コードが コンパイル時に畳み込めない分不利)などの手法を使って、 可搬性と効率を両立させる訳だが、Fortranの場合はどうするのが 良いだろう。

• Fortranでは、シングルトンパターンのThread Safeを保証するのが難しい。
• コンパイル時に定数シンボルを割り当てる場合、enum型が無いのでインデックスの重複管理が人力となる。