我正在尝试对旧的 fortran 代码进行修改，以使其能够处理稍微不同的二进制输入文件格式。在执行此操作的过程中，我遇到了 * 以一元方式使用。例如，在循环中找到以下代码：

还有其他情况，但据我所见/记得它仅在函数调用中。这是在做什么？

我不是 Fortran 人，但这个问题让我很感兴趣，所以我做了一些调查。它似乎是一个备用返回说明符。星号后面的数字是一个标签，可以用来代替正常返回，几乎就像捕获异常一样。