diff options
| -rw-r--r-- | chickadee/render/gl.scm | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/chickadee/render/gl.scm b/chickadee/render/gl.scm index e6d7305..7b23697 100644 --- a/chickadee/render/gl.scm +++ b/chickadee/render/gl.scm @@ -253,7 +253,14 @@ object.") -> void) "Specify the value of a uniform variable for the current program object") -(export (glUniform1ui . gl-uniform1ui)) +(define-gl-procedure (glUniform1uiv (location GLint) + (count GLint) + (ptr GLvoid-*) + -> void) + "Specify the value of a uniform variable for the current program object") + +(export (glUniform1ui . gl-uniform1ui) + (glUniform1uiv . gl-uniform1uiv)) (re-export (%glUseProgram . gl-use-program) (%glDeleteProgram . gl-delete-program) @@ -276,15 +283,18 @@ object.") (%glGetActiveUniform . gl-get-active-uniform) (%glGetActiveAttrib . gl-get-active-attrib) (%glUniform1i . gl-uniform1i) + (%glUniform1iv . gl-uniform1iv) (%glUniform2i . gl-uniform2i) (%glUniform3i . gl-uniform3i) (%glUniform4i . gl-uniform4i) (%glUniform1f . gl-uniform1f) + (%glUniform1fv . gl-uniform1fv) (%glUniform2f . gl-uniform2f) (%glUniform2fv . gl-uniform2fv) (%glUniform3f . gl-uniform3f) (%glUniform3fv . gl-uniform3fv) (%glUniform4f . gl-uniform4f) + (%glUniform4fv . gl-uniform4fv) (%glUniformMatrix4fv . gl-uniform-matrix4fv) (%glUniform4f . gl-uniform4f)) |