Use OPAL random generator.
This fix is related to issue #1877, and prevents the OMPI library from messing the user level random values. Signed-off-by: George Bosilca <bosilca@icl.utk.edu>
Этот коммит содержится в:
родитель
fbe6c22b90
Коммит
081f9bc8db
@ -2,6 +2,7 @@
|
|||||||
#include <stdio.h>
|
#include <stdio.h>
|
||||||
#include "tm_verbose.h"
|
#include "tm_verbose.h"
|
||||||
#include "tm_malloc.h"
|
#include "tm_malloc.h"
|
||||||
|
#include "opal/util/alfg.h"
|
||||||
|
|
||||||
#define EXTRA_BYTE 100
|
#define EXTRA_BYTE 100
|
||||||
|
|
||||||
@ -67,15 +68,16 @@ void my_mem_check(void){
|
|||||||
|
|
||||||
void init_extra_data(void){
|
void init_extra_data(void){
|
||||||
static int done = 0;
|
static int done = 0;
|
||||||
|
opal_rng_buff_t rng;
|
||||||
int i;
|
int i;
|
||||||
|
|
||||||
if(done)
|
if(done)
|
||||||
return;
|
return;
|
||||||
|
|
||||||
srandom(0);
|
opal_srand(&rng,0);
|
||||||
|
|
||||||
for( i = 0 ; i < EXTRA_BYTE; i++)
|
for( i = 0 ; i < EXTRA_BYTE; i++)
|
||||||
extra_data[i] = (char) random() % 256;
|
extra_data[i] = (char) opal_rand(&rng) % 256;
|
||||||
|
|
||||||
done = 1;
|
done = 1;
|
||||||
}
|
}
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user