From 6ae1d3548d8adaa1dbdafe4e57b321a5489ff3c0 Mon Sep 17 00:00:00 2001 From: Ferdi Franceschini Date: Fri, 1 Sep 2006 16:14:44 +1000 Subject: [PATCH] Catch dmc_connect errors when running slits homing routines. r1102 | ffr | 2006-09-01 16:14:44 +1000 (Fri, 01 Sep 2006) | 2 lines --- site_ansto/instrument/hrpd/hrpd_configuration.tcl | 14 ++++++++------ 1 file changed, 8 insertions(+), 6 deletions(-) diff --git a/site_ansto/instrument/hrpd/hrpd_configuration.tcl b/site_ansto/instrument/hrpd/hrpd_configuration.tcl index 7d28bf85..07c3da5c 100644 --- a/site_ansto/instrument/hrpd/hrpd_configuration.tcl +++ b/site_ansto/instrument/hrpd/hrpd_configuration.tcl @@ -1,5 +1,5 @@ -# $Revision: 1.13 $ -# $Date: 2006-09-01 02:01:31 $ +# $Revision: 1.14 $ +# $Date: 2006-09-01 06:14:44 $ # Author: Ferdi Franceschini (ffr@ansto.gov.au) # Last revision by: $Author: ffr $ @@ -63,10 +63,12 @@ set dmc2280_controller4(host) 137.157.201.69 set dmc2280_controller4(port) 1034 # Run slit homing routines on controllers 3 and 4 -connect dmc2280_controller3 -sendCmd dmc2280_controller3 "XQ#HOME,1" -connect dmc2280_controller4 -sendCmd dmc2280_controller4 "XQ#HOME,1" +if [catch {dmc_connect dmc2280_controller3} ] { + dmc_sendCmd dmc2280_controller3 "XQ#HOME,1" +} +if [catch {dmc_connect dmc2280_controller4} ] { + dmc_sendCmd dmc2280_controller4 "XQ#HOME,1" +} #Motor mom DMC2280 [params \ # host $dmc2280_controller1(host)\