[svn-r12233] Purpose: Maintenance

Description: Some dumper tests suppose to fail; those tests cause make file
             to exit.

Solution: For now I commented those tests to let other tests
          to run; output is saved in a file for examination. Next step
          will be to compare with the existing output. (Actually
          the next step will be to learn how to program functions in DCL to
          create a test script similar to UNIX one, but at least I finally
          figured out why the test script was exiting.)

Platforms tested: VMS server

Misc. update:

1 files changed, 82 insertions, 119 deletions

diff --git a/vms/tools/h5dump/check.com b/vms/tools/h5dump/check.com
index b68c020..fdae04f 100644
--- a/vms/tools/h5dump/check.com
+++ b/vms/tools/h5dump/check.com
@@ -14,165 +14,131 @@ $!#
 $!
 $! h5dump testing script
 $!
+$! Some tests suppose to fail; to prevent exit from the command 
+$! file and continue with outher tests, those tests are commented out
+$! for now with the comment "has error message"
+$! Some features like filters and file drivers have not been tested yet
+$!
+$!          EIP, April 12, 2006
+$!
 $ define sys$output h5dump.out
-$ define sys$error  h5dump.err
+$! define sys$error  h5dump.err
 $ h5dump :== $sys$sysusers:[pourmale.hdf5.tools.h5dump]h5dump.exe
 $! test for displaying groups 
-
-$! h5dump  tgroup.h5
-$! test for displaying the selected groups
+$ h5dump  tgroup.h5
+$!
+$! test for displaying the selected groups (has error message)
 $! h5dump --group=/g2 --group / -g /y tgroup.h5
-
 $! test for displaying simple space datasets
-$! h5dump tdset.h5
-$ type sys$input
-      ----- test for displaying selected datasets 
-$ h5dump  "-H" -d dset1 -d /dset2 --dataset=dset3 tdset.h5
-$! h5dump  "-H" -d dset1 -d /dset2 -d dset3 tdset.h5
-$
+$ h5dump tdset.h5
+$! h5dump  -"H" -d dset1 -d /dset2 --dataset=dset3 tdset.h5
+$! h5dump  -"H" -d dset1 -d /dset2 -d dset3 tdset.h5
+$!
 $! test for displaying attributes
-$! h5dump  tattr.h5
+$ h5dump  tattr.h5
+$! 
 $! test for displaying the selected attributes of string type and scalar space
-$ h5dump  -a /attr1 --attribute /attr4 --attribute=/attr5 tattr.h5
+$! (has error message)
+$! h5dump  -a /attr1 --attribute /attr4 --attribute=/attr5 tattr.h5
 $! test for header and error messages
-$ type sys$input
-      ----- test for displaying shared datatype in attribute
-$ h5dump  "-A" tnamed_dtype_attr.h5
-
+$ h5dump  -"A" tnamed_dtype_attr.h5
 $! test for displaying soft links
-$! h5dump  tslink.h5
+$ h5dump  tslink.h5
 $! test for displaying the selected link
-$! h5dump -l slink2 tslink.h5
-
+$ h5dump -l slink2 tslink.h5
 $! tests for hard links
-$! h5dump thlink.h5
-$! h5dump -d /g1/dset2 --dataset /dset1 --dataset=/g1/g1.1/dset3 thlink.h5
-$! h5dump -d /g1/g1.1/dset3 --dataset /g1/dset2 --dataset=/dset1 thlink.h5
-$! h5dump -g /g1 thlink.h5
-$! h5dump -d /dset1 -g /g2 -d /g1/dset2 thlink.h5
-
+$ h5dump thlink.h5
+$ h5dump -d /g1/dset2 --dataset /dset1 --dataset=/g1/g1.1/dset3 thlink.h5
+$ h5dump -d /g1/g1.1/dset3 --dataset /g1/dset2 --dataset=/dset1 thlink.h5
+$ h5dump -g /g1 thlink.h5
+$ h5dump -d /dset1 -g /g2 -d /g1/dset2 thlink.h5
 $! tests for compound data types
-$! h5dump tcompound.h5
+$ h5dump tcompound.h5
 $! test for named data types
-$! h5dump -t /type1 --datatype /type2 --datatype=/group1/type3 tcompound.h5
+$ h5dump -t /type1 --datatype /type2 --datatype=/group1/type3 tcompound.h5
 $! test for unamed type 
-
 $! test complicated compound datatype
-$! h5dump tcompound_complex.h5
-
+$ h5dump tcompound_complex.h5
 $!test for the nested compound type
-$! h5dump tnestedcomp.h5
-
+$ h5dump tnestedcomp.h5
 $! test for options
-$! h5dump tall.h5
-$! h5dump --header -g /g1/g1.1 -a attr2 tall.h5
-$! h5dump -d /g2/dset2.1 -l /g1/g1.2/g1.2.1/slink tall.h5
-
+$ h5dump tall.h5
+$ h5dump --header -g /g1/g1.1 -a attr2 tall.h5
+$ h5dump -d /g2/dset2.1 -l /g1/g1.2/g1.2.1/slink tall.h5
 $! test for loop detection
-$! h5dump tloop.h5
-
+$ h5dump tloop.h5
 $! test for string 
-$! h5dump tstr.h5
-$! h5dump tstr2.h5
-
+$ h5dump tstr.h5
+$ h5dump tstr2.h5
 $! test for file created by Lib SAF team
-$! h5dump tsaf.h5
-
+$ h5dump tsaf.h5
 $! test for file with variable length data
-$! h5dump tvldtypes1.h5
-$! h5dump tvldtypes2.h5
-$! h5dump tvldtypes3.h5
-$! h5dump tvldtypes4.h5
-$! h5dump tvldtypes5.h5
-
+$ h5dump tvldtypes1.h5
+$ h5dump tvldtypes2.h5
+$ h5dump tvldtypes3.h5
+$ h5dump tvldtypes4.h5
+$ h5dump tvldtypes5.h5
 $!test for file with variable length string data
-$! h5dump tvlstr.h5
-
+$ h5dump tvlstr.h5
 $! test for files with array data
-$! h5dump tarray1.h5
-$! h5dump tarray2.h5
-$! h5dump tarray3.h5
-$! h5dump tarray4.h5
-$! h5dump tarray5.h5
-$! h5dump tarray6.h5
-$! h5dump tarray7.h5
-
+$ h5dump tarray1.h5
+$ h5dump tarray2.h5
+$ h5dump tarray3.h5
+$ h5dump tarray4.h5
+$ h5dump tarray5.h5
+$ h5dump tarray6.h5
+$ h5dump tarray7.h5
 $! test for files with empty data
-$! h5dump tempty.h5
-
+$ h5dump tempty.h5
 $! test for files with groups that have comments
-$! h5dump tgrp_comments.h5
-
+$ h5dump tgrp_comments.h5
 $! test the --filedriver flag
 $! h5dump  --filedriver=split tsplit_file
 $! h5dump  --filedriver=family tfamily%05d.h5
 $! h5dump  --filedriver=multi tmulti
-
 $! test for files with group names which reach > 1024 bytes in size
-$! h5dump  -w157 tlarge_objname.h5
-$ type sys$input
-       ----- test '-A' to suppress data but print attr's
-$ h5dump  "-A" tall.h5
-
+$ h5dump  -w157 tlarge_objname.h5
+$ h5dump  -"A" tall.h5
 $! test '-r' to print attributes in ASCII instead of decimal
-$ type sys$input
-       ----- test -r to print in ASCII instead of decimal
-$ h5dump  "-A" -r tall.h5
-
+$ h5dump  -"A" -r tall.h5
 $! test Subsetting
-$! h5dump --dataset=/g1/g1.1/dset1.1.1 --start=1,1 --stride=2,3 --count=3,2 --block=1,1 tall.h5
-$! h5dump -d "/g1/g1.1/dset1.1.2[0;2;10;]" tall.h5
-$! h5dump -d "/dset1[1,1;;;]" tdset.h5
-$! h5dump -d "/dset1[;3,2;4,4;1,4]" tdset2.h5
-
+$ h5dump --dataset=/g1/g1.1/dset1.1.1 --start=1,1 --stride=2,3 --count=3,2 --block=1,1 tall.h5
+$ h5dump -d "/g1/g1.1/dset1.1.2[0;2;10;]" tall.h5
+$ h5dump -d "/dset1[1,1;;;]" tdset.h5
+$ h5dump -d "/dset1[;3,2;4,4;1,4]" tdset2.h5
 $! test printing characters in ASCII instead of decimal
-$! h5dump -r tchar.h5
-
+$ h5dump -r tchar.h5
 $! test failure handling
-$! Missing file name
+$! Missing file name (has error message)
 $! h5dump 
-
 $! rev. 2004
-$ type sys$input
-       ------ test for super block
-$ h5dump "-H" "-B" -d dset tfcontents1.h5
-$ type sys$input
-       ------ test for super block
-$ h5dump "-B" tfcontents2.h5
-
-$! test -p with a non existing dataset
+$ h5dump -"H" -"B" -d dset tfcontents1.h5
+$ h5dump -"B" tfcontents2.h5
+$! test -p with a non existing dataset (has error message)
 $! h5dump -p -d bogus tfcontents1.h5
-
 $! test for file contents
-$! h5dump -n tfcontents1.h5
-
+$ h5dump -n tfcontents1.h5
 $! tests for storage layout
 $! compact
-$! h5dump --header -p -d compact tfilters.h5
+$ h5dump --header -p -d compact tfilters.h5
 $! contiguous
-$! h5dump --header -p -d contiguous tfilters.h5
+$ h5dump --header -p -d contiguous tfilters.h5
 $! chunked
-$! h5dump --header -p -d chunked tfilters.h5
+$ h5dump --header -p -d chunked tfilters.h5
 $! external 
-$! h5dump --header -p -d external tfilters.h5
-
+$ h5dump --header -p -d external tfilters.h5
 $! fill values
-$! h5dump -p tfvalues.h5
-
+$ h5dump -p tfvalues.h5
 $! several datatype, with references , print path
-$! h5dump  tattr2.h5
-
+$ h5dump  tattr2.h5
 $! escape/not escape non printable characters
-$! h5dump -e tstr3.h5
-$! h5dump tstr3.h5
+$ h5dump -e tstr3.h5
+$ h5dump tstr3.h5
 $! char data as ASCII with non escape
-$! h5dump  -r -d str4 tstr3.h5
-
+$ h5dump  -r -d str4 tstr3.h5
 $! array indices print/not print
-$! h5dump taindices.h5
-$! h5dump -y taindices.h5
-
-
+$ h5dump taindices.h5
+$ h5dump -y taindices.h5
 $! tests for filters
 $! SZIP
 $!option="-H -p -d szip tfilters.h5"
@@ -181,7 +147,7 @@ $! SKIP $option
 $!else
 $!$! h5dump tszip.ddl $option
 $!fi
-$$! deflate
+$! deflate
 $!option="-H -p -d deflate tfilters.h5"
 $!if test $USE_FILTER_DEFLATE != "yes"; then
 $! SKIP $option
@@ -224,12 +190,9 @@ $!else
 $! $! h5dump tallfilters.ddl $option
 $!fi
 $! user defined
-$! h5dump tuserfilter.ddl -H  -p -d myfilter  tfilters.h5
-    
+$ h5dump  -"H"  -p -d myfilter  tfilters.h5    
 $! test for displaying dataset and attribute of null space
-$! h5dump tnullspace.h5
-
+$ h5dump tnullspace.h5
 $! test for displaying objects with very long names
-$! h5dump tlonglinks.h5
-
-
+$ h5dump tlonglinks.h5
+$ exit