TCL 中的取反运算
Negation operation in TCL
我还没找到如何在 TCL 中取反布尔值...
我试过了：
set x true
puts !$x #prints '!true'
puts ![$x] #prints !
puts [!$x] #prints no event matches "true"
puts !{$x} #prints !{true}
puts {!$x} #prints !$x
逻辑'not'是一个算术运算符，所以你需要expr
% set x true
true
% puts [expr {!$x}]
0
% puts [expr {!!$x}]
1
我还没找到如何在 TCL 中取反布尔值... 我试过了：
set x true
puts !$x #prints '!true'
puts ![$x] #prints !
puts [!$x] #prints no event matches "true"
puts !{$x} #prints !{true}
puts {!$x} #prints !$x
逻辑'not'是一个算术运算符，所以你需要expr
% set x true
true
% puts [expr {!$x}]
0
% puts [expr {!!$x}]
1