File: test-147.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 (17 lines) | stat: -rw-r--r-- 453 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
#include "test_static.isph"
// rule: skip on cpu=tgllp
// rule: skip on cpu=dg2

task void f_f(uniform float RET[], uniform float aFOO[]) {
    #pragma ignore warning(perf)
    double x = aFOO[programIndex&0x3]*1d100;
    double d, ix; 
    ix = rcp(x);
    d = (ix - 1.0d0 / x);
    d = (d < 0.0d0) ? -d : d;
    RET[programIndex] = (d < 1d-15 && !isnan(d)) ? 1.0d0 : 0.0d0; 
}

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