[svn-r633] Changes since 19980828

----------------------

./RELEASE
	Updated with important changes I made since the second beta.

./src/H5A.c
./src/H5D.c
./src/H5Dprivate.h
./src/H5G.c
./src/H5Gprivate.h
./src/H5R.c
./src/H5Rprivate.h
./src/H5T.c
./src/H5Tprivate.h
	Any API function that used to take an `hid_t loc_id' followed
	by a `const char *name' can now take any type of object for
	the loc_id as long as the object is somehow associated with a
	file. Internally, H5G_loc() was modified to return an
	H5G_entry_t* instead of an H5G_t* so it's more general.

	Among other things, this allows one to retrieve information
	about an object like a named type or dataset without knowing
	the name of the type or dataset:

	    int
	    get_nlinks (hid_t obj)
	    {
	        H5G_stat_t	sb;
		if (H5Gstat(obj, ".", TRUE, &sb)<0) return -1;
		return sb.nlink;
	    }

./test/gheap.c
./test/istore.c
	These files needed a couple of changes because they call some
	of the internal functions whose H5G_t arguments changed to
	H5G_entry_t.

./src/H5A.c
	Got rid of all the switch statements for getting symbol table
	entries for varous objects and replaced them with a call to
	H5G_loc() allowing attributes to automatically apply to any
	type of object that belongs to a file.

./test/Makefile.in
	Moved the ragged array tests from the normal list of tests to
	the `make timings' target.

./test/ragged.c
	Added rewrite tests -- rewrite the rows of a dataset changing
	the number of rows and the length of each row.

./test/mtime.c
	Added a test that checks that H5Gstat() can be called with a
	dataset as the first argument.

./src/H5S.c
	Added #ifdef HAVE_PARALLEL around code to check for the
	HDF5_MPI_OPT_TYPES environment variable because the global
	variable that gets set is #ifdef'd.

./bin/release
	bzip2 uses .bz2 as the file extension.

1 files changed, 18 insertions, 13 deletions

diff --git a/test/ragged.c b/test/ragged.c
index f5ba2f4..1e2d6ea 100644
--- a/test/ragged.c
+++ b/test/ragged.c
@@ -138,7 +138,7 @@ rand_nelmts(int reset_counters)
 {
     double		p = (rand() % 1000000)/1000000.0;
     double		total = 0.0;
-    size_t		size, i;
+    size_t		size=0, i;
     static size_t	ncalls=0;
 
     if (reset_counters) {
@@ -174,9 +174,9 @@ rand_nelmts(int reset_counters)
 
 
 /*-------------------------------------------------------------------------
- * Function:	ragged_append
+ * Function:	ragged_write_all
  *
- * Purpose:	Writes rows to the end of ragged array RA.
+ * Purpose:	Writes rows to the ragged array RA.
  *
  * Return:	Success:	0
  *
@@ -190,7 +190,7 @@ rand_nelmts(int reset_counters)
  *-------------------------------------------------------------------------
  */
 static int
-ragged_append(hid_t ra, hsize_t rows_at_once)
+ragged_write_all(hid_t ra, hsize_t rows_at_once)
 {
     int			*dd, total_nelmts=0;
     hssize_t		row;			/*current row number	*/
@@ -203,7 +203,7 @@ ragged_append(hid_t ra, hsize_t rows_at_once)
     char		s[64];			/*tempory string buffer	*/
     char		testname[80];
 
-    sprintf(testname, "Testing append, units of %lu",
+    sprintf(testname, "Testing write all, units of %lu",
 	    (unsigned long)rows_at_once);
     printf("%s...\n", testname);
     fflush(stdout);
@@ -276,7 +276,7 @@ ragged_append(hid_t ra, hsize_t rows_at_once)
     
 
 /*-------------------------------------------------------------------------
- * Function:	ragged_readall
+ * Function:	ragged_read_all
  *
  * Purpose:	Reads all rows of a ragged array in row order a few rows at a
  *		time.
@@ -293,7 +293,7 @@ ragged_append(hid_t ra, hsize_t rows_at_once)
  *-------------------------------------------------------------------------
  */
 static int
-ragged_readall(hid_t ra, hsize_t rows_at_once)
+ragged_read_all(hid_t ra, hsize_t rows_at_once)
 {
     int			total_nelmts=0;
     hsize_t		i, j;			/*counters		*/
@@ -403,7 +403,7 @@ ragged_readall(hid_t ra, hsize_t rows_at_once)
 
 
 /*-------------------------------------------------------------------------
- * Function:	ragged_readshort
+ * Function:	ragged_read_short
  *
  * Purpose:	Reads all the data but only the part that is in the `raw'
  *		dataset.  We should see a nice speed increase because we
@@ -422,7 +422,7 @@ ragged_readall(hid_t ra, hsize_t rows_at_once)
  *-------------------------------------------------------------------------
  */
 static int
-ragged_readshort(hid_t ra, hsize_t rows_at_once, hsize_t width)
+ragged_read_short(hid_t ra, hsize_t rows_at_once, hsize_t width)
 {
     int			total_nelmts=0;
     hsize_t		i, j;
@@ -545,7 +545,7 @@ ragged_readshort(hid_t ra, hsize_t rows_at_once, hsize_t width)
     printf("%-70s*FAILED*\n\n", testname);
     return -1;
 }
-    
+
 
 /*-------------------------------------------------------------------------
  * Function:	main
@@ -600,9 +600,14 @@ main(int argc, char *argv[])
     if (H5Pclose(dcpl)<0) goto error;
 
     /* The tests */
-    if (ragged_append(ra, rows_at_once)<0) goto error;
-    if (ragged_readall(ra, rows_at_once)<0) goto error;
-    if (ragged_readshort(ra, rows_at_once, ch_size[1])<0) goto error;
+    if (ragged_write_all(ra, rows_at_once)<0) goto error;
+    if (ragged_read_all(ra, rows_at_once)<0) goto error;
+    if (ragged_read_short(ra, rows_at_once, ch_size[1])<0) goto error;
+    
+    /* The tests again */
+    if (ragged_write_all(ra, rows_at_once)<0) goto error;
+    if (ragged_read_all(ra, rows_at_once)<0) goto error;
+    if (ragged_read_short(ra, rows_at_once, ch_size[1])<0) goto error;
     
     /* Conclusions */
     printf("\n\nDistribution of row lengths:\n");