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 个字符限制。行的长度可以更长。