- Most instrument test files have been tested

- sinqcom undwerwent extension to cover more devices and is now more or less finished
2007-04-26 14:34:58 +00:00
parent 524dac0fbf
commit a24f56e7fb
14 changed files with 303 additions and 122 deletions
--- a/insttest/polditest
+++ b/insttest/polditest
@ -18,6 +18,8 @@ if {$argc > 0} {
 initSicsDebug $instrument
 config rights lnsmanager lnsSICSlns

+standardPreluse $instrument count
+
 #---------- configuration
 set notList [list chopperspeed]

@ -37,10 +39,6 @@ lappend varList [list x0_det -840 .5]
 lappend varList [list y0_det -880 .5]
 lappend varList [list det_size 1.25 .5]

-exe upload
-exe append count timer 120
-exe forcesave insttestbatch.tcl
-
 lappend interruptList "count timer 120"
 lappend interruptList "exe insttestbatch.tcl"

@ -58,6 +56,8 @@ set par(varList) $varList
 #================= actually test =====================================
 set counters [runStandardTests par]

+standardRestore
+
 #------------ print a summary
 set inst [string toupper $instrument]
 puts stdout "Test Summary for $inst"