Intel编译器下Fortran internal write语句突发报错问题咨询

结论 #

这个写法违反Fortran语言标准，不属于Intel编译器的Bug，是新版Intel编译器收紧了合规性校验，此前各编译器未对这类未定义行为做强制限制而已。

标准依据 #

Fortran语言标准对内部I/O语句有明确约束：

• 内部WRITE语句中作为输出目标的字符变量，不允许同时出现在该语句的输入参数列表中
• 该场景下的行为被明确定义为未定义行为，编译器不需要给出兼容实现，任何运行结果都符合标准要求

你用到的写法：

WRITE(filename, '(A16,"_",I4,".dat")') filename, indx

刚好触发了这条约束：filename同时作为内部WRITE的输出目标和输入参数。

历史兼容原因 #

此前多数编译器的内部WRITE实现逻辑是「先读取所有输入参数存入临时缓冲区，再向输出目标写入结果」，刚好巧合实现了你预期的拼接效果，但这属于编译器实现的偶然选择，并非标准强制要求的行为，本身不具备跨版本、跨平台的可靠性。

新版Intel编译器的改动 #

新版Intel oneAPI系列编译器增加了未定义行为的运行时校验，专门检测这类write-to-self的风险场景：

• 编译/运行阶段抛出对应告警
• 运行时主动清空目标变量，显式暴露不符合标准的写法
  该设计是合规的，并非过度严苛或存在Bug。

正确修复方案 #

你当前使用临时变量作为输出目标的方案是标准兼容的，示例如下：

WRITE(filename_tmp, '(A16,"_",I4,".dat")') filename, indx
filename = filename_tmp

内容的提问来源于stack exchange，提问作者bob.sacamento