Pullback from Quokka 2015-02-18

2015-02-18 14:14:11 +11:00
parent 042119898d
commit 4619a57eff
12 changed files with 187 additions and 101 deletions
--- a/site_ansto/instrument/sans/config/environment/sct_antonparr_MCR500.tcl
+++ b/site_ansto/instrument/sans/config/environment/sct_antonparr_MCR500.tcl
@@ -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}