4.1.3 タブ形式

f95 の固定形式のソーステキストは、次のように定義されています。

• 1 から 6 の任意の列にあるタブによって、その行がタブ形式のソース行になります。

• タブより前に、コメントインジケータまたは文番号がある場合があります。

• タブが最初の文字で空白以外の場合は、次のようになります。

  • タブのあとの文字がゼロでない数字以外の場合、タブに続くテキストが最初の行です。

  • 最初のタブのあとがゼロでない数字の場合、その行は継続行です。ゼロでない数字に続くテキストは、その文の次の部分です。

f95 のデフォルト最大行の長さは、固定形式で 72 列および自由形式で 132 列です。-e コンパイラオプションを使用すると、固定形式のソースの行を 132 列に拡張できます。

例: 左のタブの形式のソースは、右に表示されます。

!^IUses of tabs
^ICHARACTER *3 A = ’A’
^IINTEGER B = 2
^IREAL C = 3.0
^IWRITE(*,9) A, B, C
9^IFORMAT(1X, A3,
^I1 I3,
^I2 F9.1 )
^IEND

!       Uses of tabs
        CHARACTER *3 A = ’A’
        INTEGER B = 2
        REAL C = 3.0
        WRITE(*,9) A, B, C
9       FORMAT(1X, A3,
       1 I3,
       2 F9.1 )
        END

前述の例で、「^I」はタブ文字を表し、「1」および「2」で始まる行は継続行を表しています。コードはさまざまなタブの状態を示しますが、いずれの形式も推奨しません。

f95 は、タブがあると以降その行の72行目までパディングします。そのため、次の行に継続する文字列にタブが表示される場合、予想外の結果を招くことがあります。

ソースファイル:

^Iprint *, "Tab on next line
^I1this  continuation line starts with a tab."
^Iend

コードの実行結果:

Tab on next line                                             this  continuation
 line starts with a tab.

タブ書式が —f77 オプションで使用される場合、行の長さに 132 文字の制限はありません。行をさらに長くできます。