summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRaymond Lu <songyulu@hdfgroup.org>2009-08-19 21:46:16 (GMT)
committerRaymond Lu <songyulu@hdfgroup.org>2009-08-19 21:46:16 (GMT)
commit7b0b5ebf567ae8d01180bb88d68377fad933649d (patch)
tree6368607e1c508d6e2c13c52b030b265ae2cea51b
parent709b497b970a30eeb600c0aa75073c668c215f6a (diff)
downloadhdf5-7b0b5ebf567ae8d01180bb88d68377fad933649d.zip
hdf5-7b0b5ebf567ae8d01180bb88d68377fad933649d.tar.gz
hdf5-7b0b5ebf567ae8d01180bb88d68377fad933649d.tar.bz2
[svn-r17385] I corrected some paths.
Not tested yet.
-rw-r--r--vms/tools/h5jam/check_h5jam.com11
1 files changed, 9 insertions, 2 deletions
diff --git a/vms/tools/h5jam/check_h5jam.com b/vms/tools/h5jam/check_h5jam.com
index a1e02f2..50be903 100644
--- a/vms/tools/h5jam/check_h5jam.com
+++ b/vms/tools/h5jam/check_h5jam.com
@@ -16,16 +16,23 @@ $ !
$ ! This command file tests h5jam and h5unjam utilities. The command file has to
$ ! run in the [hdf5-top.tools.testfiles] directory.
$ !
+$ type sys$input
+
+===================================
+ Testing h5jam utiltity
+===================================
+
$ !
$ ! Define h5jam, h5unjam and h5dump symbols
$ !
$! set message/notext/nofacility/noidentification/noseverity
$ current_dir = F$DIRECTRY()
$ len = F$LENGTH(current_dir)
-$ temp = F$EXTRACT(0, len-10, current_dir)
+$ temp = F$EXTRACT(0, len-16, current_dir)
$ h5dump_dir = temp + "H5DUMP]"
$ h5dump :== $sys$disk:'h5dump_dir'h5dump.exe
-$ h5jam_dir = temp + "H5JAM]"
+$ temp2 = F$EXTRACT(0, len-11, current_dir)
+$ h5jam_dir = temp2 + "]"
$ h5jam :== $sys$disk:'h5jam_dir'h5jam.exe
$ !
$ ! Define output for diff command that compares expected and actual