为什么Fortran中存在隐含的SAVE属性？

Question

如果我在Fortran声明语句中初始化变量,则该变量隐式接收SAVE属性,初始化表达式只执行一次.

例如,以下程序

program test
implicit none

    call foo()
    call foo()

contains

    subroutine foo ()
        integer :: i = 0

        i = i + 1
        write(*,*) i
    end subroutine foo
 end program test

将打印

1
2

由于这在许多其他语言中有所不同,我想知道为什么Fortran标准委员会选择了这种行为？

非常感谢!麦克风

Answer 1

这主要是由于历史原因.实现了旧编译器(Fortran IV(66)及之前的版本)以主要使用静态内存来生成程序.旧机器甚至没有任何堆栈.因此,程序的行为,因为变量被定义为save.

变量初始化的前身,即DATA语句,更像是定义静态内存的初始内容(类似于程序集中数据段的指令),而不是您可能从C中知道的on调用变量初始化.语法变得类似于后来的C变种.