Fortran 中的可移植输出到空流

Question

我想通过以下方式在 Fortran 程序中实现详细级别标志。代码将使用语句

write (level1, *) 'This will be shown always'
write (level2, *) 'This will be shown sometimes'

level1、level2 和更高级别的流将等于 output_unit 或对应于 /dev/null（在 Unix 上），具体取决于用户提供的详细标志的值。

但是，/dev/null 不是独立于平台的。我可以尝试手动检测 Windows 并在那里使用NUL，但我不想编写特定于平台的代码。在 Fortran 中是否有独立于平台的方式使用 write 写入输出接收器？

Answer 1

我已将我之前的评论添加到答案中，因此我们可以勾选这个问题...

Fortran 不提供独立于平台的方式将输出发送到 void。如果我想要这个工具，我可能会编写一些平台相关的代码，并将其包装到一个模块中，这样我就不必再看它了。