Merged changes from Quokka as at 2015-02-18

This commit is contained in:
Douglas Clowes
2015-02-19 09:40:49 +11:00
parent 287b671569
commit 8c4eed9bfe
6 changed files with 113 additions and 3 deletions

View File

@@ -33,8 +33,12 @@ proc ::scobj::antonparr_MCR500::mkDriver { speed_name torque_name tol settle } {
set catch_status [ catch {
# mkDriver hook code starts
if [::utility::obj_exists $speed_name] {
add_rheo $speed_name $tol $settle
}
if [::utility::obj_exists $torque_name] {
add_rheo $torque_name $tol $settle
}
# mkDriver hook code ends
} catch_message ]
handle_exception ${catch_status} ${catch_message}

View File

@@ -100,4 +100,5 @@ proc add_rheo {rhControl tol settle} {
hfactory /sics/$rhControl/settletime plain user float
hset /sics/$rhControl/settletime $settle
hsetprop /sics/$rhControl timecheck 0
hsetprop /sics/$rhControl callBack "rhCallBack /sics/$rhControl"
}