- Restore in amor.tcl

This commit is contained in:
koennecke
2007-02-23 14:32:56 +00:00
parent aff2758916
commit b3a2d26064
6 changed files with 33 additions and 14 deletions

View File

@ -1,3 +1,3 @@
75
83
NEVER, EVER modify or delete this file
You'll risk eternal damnation and a reincarnation as a cockroach!|n

View File

@ -89,6 +89,17 @@ test nxscript-1.13 {Writing sicsdata } -body {
testNoError "nxscript putsicsdata testsd data"
} -result OK
test nxscript-1.14 {Writing slabs } -body {
data clear
data putfloat 0 1.1
testNoError "nxscript putslab testslab [list 0] [list 1] data"
data putfloat 0 2.2
testNoError "nxscript putslab testslab [list 1] [list 1] data"
data putfloat 0 3.3
testNoError "nxscript putslab testslab [list 2] [list 1] data"
} -result OK
test nxscript-1.20 {Close file} -body {
testOK "nxscript close"
} -result OK

View File

@ -24,6 +24,7 @@ testar=/entry1,NXentry/detector,NXdata/SDS x_axis
testintar=/entry1,NXentry/detector,NXdata/SDS y_axis -type NX_INT32
testsd=/entry1,NXentry/detector,NXdata/SDS gurke -rank 1 \
-type NX_INT32 -dim {$(dim0)}
testslab=/entry,NXentry/SDS slappy -rank 1 -dim {-1}
testlink=/entry1,NXentry/detector,NXdata/NXVGROUP

View File

@ -193,4 +193,6 @@ hattach /instrument/sample a3 omega
hattach /instrument/sample qh qh
hmake /instrument/detector spy none
hattach /instrument/detector hm data
hattach /instrument lotte title
hattach /instrument lotte title
restore

View File

@ -18,41 +18,41 @@ source testutil.tcl
source sicstcldebug.tcl
#--------------- Test Miscellaneous stuff
source testmisc.tcl
#source testmisc.tcl
#-------------- Test for motors
source mottest.tcl
#source mottest.tcl
#-------------- Test Counter
set countername aba
set errorname aba
source countertest.tcl
#source countertest.tcl
#-------------- Test Multi Counter
set countername multi
source countertest.tcl
#source countertest.tcl
#-------------- Test batch processing
source batchtest.tcl
#source batchtest.tcl
#-------------- Test scans
source scantest.tcl
#source scantest.tcl
#------------ Test peak optimization
source optitest.tcl
#source optitest.tcl
#----------- test histogram memory
source histtest.tcl
#source histtest.tcl
#----------- test sics data
source testsicsdata.tcl
#source testsicsdata.tcl
#----------- test nxscript
source nxscripttest.tcl
#------------ test SANS MultiMotor
source testmumo.tcl
#source testmumo.tcl
#------------ print test summary
cleanupTests

View File

@ -1,6 +1,6 @@
<?xml version="1.0" encoding="UTF-8"?>
<NXroot NeXus_version="3.0.0" XML_version="mxml" file_name="test.xml"
file_time="2006-11-08 14:30:21+0100" Instrument="Washmaschine" signal="1">
file_time="2007-02-21 10:51:15+0100" Instrument="Washmaschine">
<NXentry name="entry1">
<testtext target="/entry1/testtext">Hugo ist eine Nassnase</testtext>
<testfloat NAPItype="NX_FLOAT32">
@ -40,7 +40,7 @@ file_time="2006-11-08 14:30:21+0100" Instrument="Washmaschine" signal="1">
</counts4>
</NXmonitor>
<NXdata name="detector">
<hmdata NAPItype="NX_INT32[23]">
<hmdata NAPItype="NX_INT32[23]" signal="1">
55 55 55 55
55 55 55 55
55 55 55 55
@ -76,4 +76,9 @@ file_time="2006-11-08 14:30:21+0100" Instrument="Washmaschine" signal="1">
</gurke>
</NXdata>
</NXentry>
<NXentry name="entry">
<slappy NAPItype="NX_FLOAT32[3]">
1.1000 2.2000 3.3000
</slappy>
</NXentry>
</NXroot>