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

Change puts to clientput to avoid error on stdout undefined

Browse Source
This commit is contained in:
Douglas Clowes
2014-06-30 13:44:14 +10:00
parent 202004766a
commit 7960cb73a0
7 changed files with 276 additions and 232 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
site_ansto/instrument/config/environment/sct_protek_common.tcl
View File

@@ -126,7 +126,7 @@ proc MakeProtek {name IP PORT {scale 1.0} {offset 0.0} {interval 0.5} {cbFunc "r
set sctName "sct_$name"
set sobjName "$name"
set soState "so_state_$name"
puts "MakeSICSObj $sobjName SCT_OBJECT"
clientput "MakeSICSObj $sobjName SCT_OBJECT"
MakeSICSObj $soState SCT_OBJECT
MakeSICSObj $sobjName SCT_OBJECT user float
sicslist setatt $sobjName long_name $sobjName