411d5b44ef
This lets us check for a functioning rdrand() call in the stdlib more reliably. Fixes issue #333.
34 lines
798 B
Plaintext
34 lines
798 B
Plaintext
|
|
export uniform int width() { return programCount; }
|
|
|
|
export void f_f(uniform float RET[], uniform float aFOO[]) {
|
|
#ifndef ISPC_HAS_RAND
|
|
RET[programIndex] = 0;
|
|
#else
|
|
|
|
int set[32] = { 0 };
|
|
uniform int count = 1024*1024;
|
|
for (uniform int i = 0; i < count; ++i) {
|
|
int32 r;
|
|
while (!rdrand(&r))
|
|
;
|
|
for (uniform int b = 0; b < 32; ++b)
|
|
if (((unsigned int32)r >> b) & 1)
|
|
++set[b];
|
|
}
|
|
|
|
RET[programIndex] = 0;
|
|
for (uniform int b = 0; b < 32; ++b) {
|
|
float r = (double)set[b] / (double)(count);
|
|
if (!(r >= .49 && r < .51)) {
|
|
print("% % - %\n", b, r, set[b]);
|
|
++RET[programIndex];
|
|
}
|
|
}
|
|
#endif
|
|
}
|
|
|
|
export void result(uniform float RET[]) {
|
|
RET[programIndex] = 0;
|
|
}
|