1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
|
# test indirect access to an array of constant doubles
[require]
GLSL >= 1.50
GL_ARB_gpu_shader_fp64
[vertex shader]
#version 150
in vec4 vertex;
void main()
{
gl_Position = vertex;
}
[fragment shader]
#version 150
#extension GL_ARB_gpu_shader_fp64 : require
uniform double arg0;
uniform double tval[5];
uniform double tolerance;
uniform double expected;
uniform int pick;
out vec4 color;
void main()
{
double result;
result = (tval[pick] + arg0);
color = distance(result, expected) <= tolerance
? vec4(0.0, 1.0, 0.0, 1.0) : vec4(1.0, 0.0, 0.0, 1.0);
}
[vertex data]
vertex/float/2
-1.0 -1.0
1.0 -1.0
1.0 1.0
-1.0 1.0
[test]
clear color 0.0 0.0 1.0 0.0
clear
uniform double tval[0] 0.0
uniform double tval[1] 0.25
uniform double tval[2] 0.5
uniform double tval[3] 0.75
uniform double arg0 0.25
uniform double expected 0.75
uniform double tolerance 0.0
uniform int pick 2
draw arrays GL_TRIANGLE_FAN 0 4
uniform double arg0 0.25
uniform double expected 0.5
uniform double tolerance 0.0
uniform int pick 1
draw arrays GL_TRIANGLE_FAN 0 4
|
