指定 GOTO

Assigned GOTO 使用整数变量,使用 ASSIGN 语句为其分配语句标签。

100 CONTINUE

...

ASSIGN 100 TO ILABEL

...

GOTO ILABEL

已分配的 GOTO 在 Fortran 90 中已过时,在 Fortran 95 及更高版本中已删除。通过使用过程,内部过程,过程指针和其他功能,可以在现代代码中避免这种情况。