1 files changed, 118 insertions, 0 deletions
diff --git a/HDF5Examples/FORTRAN/H5G/test.sh.in b/HDF5Examples/FORTRAN/H5G/test.sh.in
new file mode 100755
index 0000000..e2082e9
--- /dev/null
+++ b/HDF5Examples/FORTRAN/H5G/test.sh.in
@@ -0,0 +1,118 @@
+#! /bin/sh
+#
+# Copyright by The HDF Group.
+# Copyright by the Board of Trustees of the University of Illinois.
+# All rights reserved.
+#
+# This file is part of HDF5.  The full HDF5 copyright notice, including
+# terms governing use, modification, and redistribution, is contained in
+# the files COPYING and Copyright.html.  COPYING can be found at the root
+# of the source code distribution tree; Copyright.html can be found at the
+# root level of an installed copy of the electronic HDF5 document set and
+# is linked from the top-level documents page.  It can also be found at
+# http://hdfgroup.org/HDF5/doc/Copyright.html.  If you do not have
+# access to either file, you may request a copy from help@hdfgroup.org.
+
+srcdir=@srcdir@
+
+
+case $FC in
+*/*)    H5DUMP=`echo $FC | sed -e 's/\/[^/]*$/\/h5dump/'`;
+        test -x $H5DUMP || H5DUMP=h5dump;;
+*)      H5DUMP=h5dump;;
+esac
+
+
+case `echo "testing\c"; echo 1,2,3`,`echo -n testing; echo 1,2,3` in
+  *c*,-n*) ECHO_N= ECHO_C='
+' ;;
+  *c*,*  ) ECHO_N=-n ECHO_C= ;;
+  *)       ECHO_N= ECHO_C='\c' ;;
+esac
+ECHO_N="echo $ECHO_N"
+
+
+exout() {
+    $*
+}
+
+dumpout() {
+    $H5DUMP $*
+}
+
+H5_LIBVER=@H5_LIBVER@
+H5_LIBVER_DIR=@H5_LIBVER_DIR@
+
+return_val=0
+
+
+$ECHO_N "Testing FORTRAN/H5G/h5ex_g_create...$ECHO_C"
+./h5ex_g_create
+dumpout h5ex_g_create.h5 >tmp.test
+rm -f h5ex_g_create.h5
+cmp -s tmp.test $srcdir/tfiles/18/h5ex_g_create.ddl
+status=$?
+if test $status -ne 0
+then
+    echo "  FAILED!"
+else
+    echo "  Passed"
+fi
+return_val=`expr $status + $return_val`
+
+
+$ECHO_N "Testing FORTRAN/H5G/h5ex_g_compact...$ECHO_C"
+./h5ex_g_compact >/dev/null
+dumpout h5ex_g_compact1.h5 >tmp.test
+cmp -s tmp.test $srcdir/tfiles/18/h5ex_g_compact1.ddl
+status=$?
+if test $status -ne 0
+then
+    echo "  FAILED!"
+else
+  dumpout h5ex_g_compact2.h5 >tmp.test
+  cmp -s tmp.test $srcdir/tfiles/18/h5ex_g_compact2.ddl
+  status=$?
+  if test $status -ne 0
+  then
+      echo "  FAILED!"
+  else
+      echo "  Passed"
+  fi
+fi
+return_val=`expr $status + $return_val`
+rm -f h5ex_g_compact1.h5
+rm -f h5ex_g_compact2.h5
+
+
+$ECHO_N "Testing FORTRAN/H5G/h5ex_g_phase...$ECHO_C"
+exout ./h5ex_g_phase >tmp.test
+cmp -s tmp.test $srcdir/tfiles/18/h5ex_g_phase.tst
+status=$?
+if test $status -ne 0
+then
+    echo "  FAILED!"
+else
+    echo "  Passed"
+fi
+return_val=`expr $status + $return_val`
+rm -f h5ex_g_phase.h5
+
+
+$ECHO_N "Testing FORTRAN/H5G/h5ex_g_corder...$ECHO_C"
+exout ./h5ex_g_corder >tmp.test
+cmp -s tmp.test $srcdir/tfiles/18/h5ex_g_corder.tst
+status=$?
+if test $status -ne 0
+then
+    echo "  FAILED!"
+else
+    echo "  Passed"
+fi
+return_val=`expr $status + $return_val`
+rm -f h5ex_g_corder.h5
+
+
+rm -f tmp.test
+echo "$return_val tests failed in /FORTRAN/H5G/"
+exit $return_val