- Most instrument test files have been tested
- sinqcom undwerwent extension to cover more devices and is now more or less finished
This commit is contained in:
@ -12,8 +12,15 @@ if {$argc < 3} {
|
||||
source sicstcldebug.tcl
|
||||
initSicsDebug [lindex $argv 0]
|
||||
config rights [lindex $argv 1] [lindex $argv 2]
|
||||
exec sleep 5
|
||||
puts $socke "INT1712 3"
|
||||
for {set i 0} {$i < 5} {incr i} {
|
||||
exec sleep 5
|
||||
set txt [sicscommand status]
|
||||
if {[string first Eager $txt] < 0} {
|
||||
puts $socke "INT1712 3"
|
||||
break
|
||||
}
|
||||
}
|
||||
sicscommand logoff
|
||||
exit 0
|
||||
|
||||
|
||||
|
Reference in New Issue
Block a user