有没有办法判断默认流是否已打开？

Question

图书馆中有一行无法取出：

put oResults format "x(80)" skip.

我有一个程序正在调用没有默认输出的库，所以这行错误了。

我知道我可以在我的程序中的某个地方发送输出，但我想修复它，所以你不必有输出。寻求功能可能吗？

编辑：10.2b

我只在unix中出错。

在unix环境中这一行：

put oResults format "x(80)" skip.

出错。

但如果你把：

if seek(output) <> ? then 
  put oResults format "x(80)" skip.

它没有错误。

---

在unix环境中：

put oResults format "x(80)" skip.

错误。

但如果你把：

if seek(output) <> ? then 
  put oResults format "x(80)" skip.

它没有错误。

Answer 1

您正在以批处理模式运行。在批处理模式下运行时，始终应在操作系统级别重定向输出。像这样：

bpro -p test.p > errors.out 2>&1

不重定向输出几乎总会导致您看到的错误。

如果要在脚本中嵌入bpro，mbpro或_progres -b或其他任何需要显示该输出或以其他方式使用它的命令，则通常会在输出文件中使用“cat”或“tail -f”。