File: rdrand-3.ispc

package info (click to toggle)
ispc 1.28.2-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 97,620 kB
  • sloc: cpp: 77,067; python: 8,303; yacc: 3,337; lex: 1,126; ansic: 631; sh: 475; makefile: 17
file content (23 lines) | stat: -rw-r--r-- 548 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
#include "test_static.isph"
task void f_f(uniform float RET[], uniform float aFOO[]) {
#ifndef ISPC_HAS_RAND
    RET[programIndex] = 1;
#else

    int lessHalf = 0, moreHalf = 0;
    for (uniform int i = 0; i < 1024*1024; ++i) {
        float r = -1;
        while (!rdrand(&r))
            ;
        if (r < 0.5) ++lessHalf;
        else ++moreHalf;
    }

    float r = (double)lessHalf / (double)(lessHalf + moreHalf);
    RET[programIndex] = (r >= .49 && r < .51);
#endif
}

task void result(uniform float RET[]) {
    RET[programIndex] = 1;
}