如何在 Tcl 中打印标准输出缓冲区大小？答案

【问题标题】：How do I print the stdout buffer size in Tcl?如何在 Tcl 中打印标准输出缓冲区大小？
【发布时间】：2015-09-09 17:10:01
【问题描述】：

我环顾四周，但找不到任何可以用来在 tcl 中打印通道的当前缓冲区大小（比如 stdout）的东西。

我计划使用fconfigure 重新调整缓冲区大小，但我想在更改之前知道当前大小是多少，作为基准。

【问题讨论】：

【解决方案1】：

只需省略实际的缓冲区大小参数。

set bufferSize [fconfigure stdout -buffersize]

【讨论】：

【解决方案2】：

% fconfigure stdout
-blocking 1 -buffering none -buffersize 4096 -encoding utf-8 -eofchar {} -translation lf
%

【讨论】：