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

SICS-754 Use "clientput" instead of "puts stdout" in generated drivers

Browse Source
This commit is contained in:
Douglas Clowes
2014-06-26 13:48:44 +10:00
parent e2ab77fca7
commit fe3489b61f
18 changed files with 18 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
site_ansto/instrument/config/environment/temperature/sct_lakeshore_218.tcl
View File

@@ -332,7 +332,7 @@ proc add_lakeshore_218 {name IP port} {
handle_exception ${catch_status} ${catch_message}
}
puts stdout "file evaluation of sct_lakeshore_218.tcl"
clientput "file evaluation of sct_lakeshore_218.tcl"
::scobj::lakeshore_218::sics_log 9 "file evaluation of sct_lakeshore_218.tcl"
proc ::scobj::lakeshore_218::read_config {} {

2
site_ansto/instrument/config/environment/temperature/sct_mercury_base.tcl
View File

@@ -542,7 +542,7 @@ proc add_mercury_base {name IP port {id 99} {tol 1}} {
handle_exception ${catch_status} ${catch_message}
}
puts stdout "file evaluation of sct_mercury_base.tcl"
clientput "file evaluation of sct_mercury_base.tcl"
::scobj::mercury_base::sics_log 9 "file evaluation of sct_mercury_base.tcl"
proc ::scobj::mercury_base::read_config {} {

2
site_ansto/instrument/config/environment/temperature/sct_mercury_level.tcl
View File

@@ -219,7 +219,7 @@ proc add_mercury_level {name IP port {id 99}} {
handle_exception ${catch_status} ${catch_message}
}
puts stdout "file evaluation of sct_mercury_level.tcl"
clientput "file evaluation of sct_mercury_level.tcl"
::scobj::mercury_level::sics_log 9 "file evaluation of sct_mercury_level.tcl"
proc ::scobj::mercury_level::read_config {} {

2
site_ansto/instrument/config/environment/temperature/sct_mercury_pres.tcl
View File

@@ -383,7 +383,7 @@ proc add_mercury_pres {name IP port {id 99} {tol 1}} {
handle_exception ${catch_status} ${catch_message}
}
puts stdout "file evaluation of sct_mercury_pres.tcl"
clientput "file evaluation of sct_mercury_pres.tcl"
::scobj::mercury_pres::sics_log 9 "file evaluation of sct_mercury_pres.tcl"
proc ::scobj::mercury_pres::read_config {} {

2
site_ansto/instrument/config/environment/temperature/sct_mercury_scpi.tcl
View File

@@ -738,7 +738,7 @@ proc add_mercury_scpi {name IP port {id 99} {permlink LT} {tol 1} {valve_tol 2}}
handle_exception ${catch_status} ${catch_message}
}
puts stdout "file evaluation of sct_mercury_scpi.tcl"
clientput "file evaluation of sct_mercury_scpi.tcl"
::scobj::mercury_scpi::sics_log 9 "file evaluation of sct_mercury_scpi.tcl"
proc ::scobj::mercury_scpi::read_config {} {

2
site_ansto/instrument/config/environment/temperature/sct_mercury_temp.tcl
View File

@@ -388,7 +388,7 @@ proc add_mercury_temp {name IP port {id 99} {tol 1}} {
handle_exception ${catch_status} ${catch_message}
}
puts stdout "file evaluation of sct_mercury_temp.tcl"
clientput "file evaluation of sct_mercury_temp.tcl"
::scobj::mercury_temp::sics_log 9 "file evaluation of sct_mercury_temp.tcl"
proc ::scobj::mercury_temp::read_config {} {

2
site_ansto/instrument/config/environment/temperature/sct_mercury_valve.tcl
View File

@@ -337,7 +337,7 @@ proc add_mercury_valve {name IP port {id 99} {valve_tol 2}} {
handle_exception ${catch_status} ${catch_message}
}
puts stdout "file evaluation of sct_mercury_valve.tcl"
clientput "file evaluation of sct_mercury_valve.tcl"
::scobj::mercury_valve::sics_log 9 "file evaluation of sct_mercury_valve.tcl"
proc ::scobj::mercury_valve::read_config {} {

2
site_ansto/instrument/config/environment/temperature/sct_pfeiffer_hg.tcl
View File

@@ -487,7 +487,7 @@ proc add_pfeiffer_hg {name IP port} {
handle_exception ${catch_status} ${catch_message}
}
puts stdout "file evaluation of sct_pfeiffer_hg.tcl"
clientput "file evaluation of sct_pfeiffer_hg.tcl"
::scobj::pfeiffer_hg::sics_log 9 "file evaluation of sct_pfeiffer_hg.tcl"
proc ::scobj::pfeiffer_hg::read_config {} {