[svn-r6940] Purpose:

Code cleanup

Description:
    Call srand(time(NULL)) before performing tests, to better randomize numbers
chosen for testing.

Platforms tested:
    h5committestted (although Fortran tests failed for some reason)
This commit is contained in:
Quincey Koziol 2003-05-31 11:19:28 -05:00
parent 8f205256f2
commit 263ff3e4fd

View File

@ -19,6 +19,7 @@
* Purpose: Tests the data type interface (H5T)
*/
#include <time.h>
#include "h5test.h"
/* Number of times to run each test */
@ -4114,6 +4115,9 @@ main(void)
unsigned long nerrors = 0;
hid_t fapl=-1;
/* Set the random # seed */
HDsrandom((unsigned long)time(NULL));
reset_hdf5();
fapl = h5_fileaccess();