loops - 在 Fortran 循环中使用指针变量

Question

我想知道使用指针变量作为循环计数的 Fortran 程序的行为应该是什么？例如使用 gfortran，这个程序:

program foo
  integer, pointer :: x
  integer, target :: y
  x => y
  do x=0,10
    y = 100                                                                                                                                                                                                                   
    print*, "hello"
  enddo
end program

执行时变成死循环。这应该发生吗？

Answer 1

示例程序不符合标准。您不得以任何方式更改 do 变量 (F2008 8.1.6.6.2p3)，其中包括使用指针的“幕后”技巧。

因此，一切皆有可能。