我正在用 Fortran 编写代码以从文件中读取属性列表，并使用 IOSTAT 函数跳过无效数据。相关部分代码如下：
do j=1,1000
read(22,*,IOSTAT=ios) step,T,K,U,Tot,P
If(IS_IOSTAT_END(ios)) Exit !exits loop if value is not number or end of file
IF(ios.ne.0) cycle
sumT=sumT+T
sumU=sumU+U
sumK = sumK + K
sumKsq = sumKsq + (K**2.d0)
end if
end do
此代码以前在 Linux 上运行时运行良好，但在 Mac OSX 上运行时，我收到错误消息“IS_IOSTAT_END 没有隐式类型”。有人可以解释如何纠正这个问题吗？
谢谢