File: call-param-match.frag

package info (click to toggle)
piglit 0~git20200212-f4710c51b-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 106,972 kB
  • sloc: ansic: 263,763; xml: 48,941; python: 29,918; lisp: 19,789; cpp: 12,142; sh: 22; makefile: 20; pascal: 5
file content (29 lines) | stat: -rw-r--r-- 467 bytes parent folder | download | duplicates (4) 
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
 
// [config]
// expect_result: pass
// glsl_version: 1.50
// require_extensions: GL_ARB_shader_subroutine
// [end config]

#version 150
#extension GL_ARB_shader_subroutine: require

uniform vec4 u;
out vec4 piglit_fragcolor;
subroutine float func_type(vec4 color);

subroutine uniform func_type f;

subroutine(func_type) float R(vec4 p)
{
    return p.r;
}

subroutine(func_type) float G(vec4 p)
{
    return p.g;
}

void main()
{
    piglit_fragcolor = vec4(f(u));
}