[svn-r20610] OpenVMS complainted about a test case in th5o.c which opened the same file twice. VMS doesn't allow it. I used the macro H5_CANNOT_OPEN_TWICE to skip the test case. In th5s.c, I created an attribute but fogot to close it in the test case for zero dimension size.

Tested on jam.  But I haven't tested on OpenVMS yet.

test/th5o.c

@@ -1351,7 +1351,9 @@ test_h5o(void)
     test_h5o_link();            /* Test object link routine */
     test_h5o_comment();         /* Test routines for comment */
     test_h5o_comment_by_name(); /* Test routines for comment by name */
+#ifndef  H5_CANNOT_OPEN_TWICE   /* OpenVMS can't open a file twice */
     test_h5o_getinfo_same_file(); /* Test info for objects in the same file */
+#endif /* H5_CANNOT_OPEN_TWICE */
 } /* test_h5o() */
 
 

test/th5s.c

@@ -930,6 +930,10 @@ test_h5s_zero_dim(void)
         }
     }
 
+    /* Close attribute */
+    ret = H5Aclose(attr);
+    CHECK(ret, FAIL, "H5Aclose");
+
     /*===============================================================
      * Extend the dimension to make it a normal dataspace (3x15x13).  
      * Verify that data can be written to and read from the chunked