Tcl技巧與bug彙總（二）

Tcl/Tk整型浮點型轉換問題

  與C/C++類似，Tcl使用int()/float()函數實現整型和浮點型數值轉換。

set a 1.0
set b [expr int($a)]
puts "a:$a  b:$b"

  輸出a:1.0 b:1。

Question:

set grid_length 1.2
set min_width 0.05
#不取整
set bin_num [expr $grid_length/$min_width]
puts $bin_num
#間接取整
set bin_num [expr int($bin_num)]
puts $bin_num
#直接取整
set bin_num [expr int($grid_length/$min_width)]
puts $bin_num

  輸出分別爲24.0，24和23！。目前沒有找到緣由，因此只能在coding中注意了。