linse/sics
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

SICS-788 Guard against integer division.

Browse Source
This commit is contained in:
Ferdi Franceschini
2014-10-08 19:59:22 +11:00
parent 3a475196a0
commit 9720f1d0f0
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
site_ansto/instrument/config/motors/sct_positmotor_common.tcl
View File

@ -124,7 +124,7 @@ proc ::scobj::positmotor::mot2ID {mot precision table} {
if {abs($mot - $m) <= $precision} { if {abs($mot - $m) <= $precision} {
return $i return $i
} elseif {[expr {$sign * ($mot - $m)} ] < 0} { } elseif {[expr {$sign * ($mot - $m)} ] < 0} {
return [expr {($mot-$mprev)*($i - $iprev)/($m - $mprev)+$iprev}] return [expr {1.0 * ($mot-$mprev)*($i - $iprev)/($m - $mprev)+$iprev}]
} }
set iprev $i set iprev $i
set mprev $m set mprev $m