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

Don't abort server_init if one of the initialisation commands fails.

Browse Source
This commit is contained in:
Ferdi Franceschini
2014-07-28 10:02:49 +10:00
parent a24afd1298
commit a7039c5ca0
1 changed files with 7 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
site_ansto/instrument/server_config.tcl
View File

@ -269,14 +269,14 @@ proc server_set_sobj_attributes {} {
proc server_init {} {
global AUTOSAVE_STATE
if [ catch { ::source::isc_initialize } msg ] { puts $msg }
if [ catch { ::counter::isc_initialize } msg ] { puts $msg }
if [ catch { ::histogram_memory::isc_initialize } msg ] { puts $msg }
if [ catch { ::scan::isc_initialize } msg ] { puts $msg }
if [ catch { ::anticollider::init } msg ] { puts $msg }
if [ catch { ::commands::isc_initialize } msg ] { puts $msg }
if [ catch { ::nexus::isc_initialize } msg ] { puts $msg }
set catch_status [ catch {
::source::isc_initialize
::counter::isc_initialize
::histogram_memory::isc_initialize
::scan::isc_initialize
::anticollider::init
::commands::isc_initialize
::nexus::isc_initialize
########
# Parameters set above the restore command will be clobbered by
# the values in the status.tcl file