;;; GENERATED BY CHICKEN-BIND FROM gl_ext_api.h (begin (begin (define BlendColor (foreign-lambda void "BlendColor" float float float float))) (begin (define BlendEquation (foreign-lambda void "BlendEquation" unsigned-integer))) (begin (define DrawRangeElements (foreign-lambda void "DrawRangeElements" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define ColorTable (foreign-lambda void "ColorTable" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define ColorTableParameterfv (foreign-lambda void "ColorTableParameterfv" unsigned-integer unsigned-integer f32vector))) (begin (define ColorTableParameteriv (foreign-lambda void "ColorTableParameteriv" unsigned-integer unsigned-integer s32vector))) (begin (define CopyColorTable (foreign-lambda void "CopyColorTable" unsigned-integer unsigned-integer integer integer unsigned-integer))) (begin (define GetColorTable (foreign-lambda void "GetColorTable" unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetColorTableParameterfv (foreign-lambda void "GetColorTableParameterfv" unsigned-integer unsigned-integer f32vector))) (begin (define GetColorTableParameteriv (foreign-lambda void "GetColorTableParameteriv" unsigned-integer unsigned-integer s32vector))) (begin (define ColorSubTable (foreign-lambda void "ColorSubTable" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define CopyColorSubTable (foreign-lambda void "CopyColorSubTable" unsigned-integer unsigned-integer integer integer unsigned-integer))) (begin (define TexImage3D (foreign-lambda void "TexImage3D" unsigned-integer integer integer unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define TexSubImage3D (foreign-lambda void "TexSubImage3D" unsigned-integer integer integer integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define CopyTexSubImage3D (foreign-lambda void "CopyTexSubImage3D" unsigned-integer integer integer integer integer integer integer unsigned-integer unsigned-integer))) (begin (define ConvolutionFilter1D (foreign-lambda void "ConvolutionFilter1D" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define ConvolutionFilter2D (foreign-lambda void "ConvolutionFilter2D" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define ConvolutionParameterf (foreign-lambda void "ConvolutionParameterf" unsigned-integer unsigned-integer float))) (begin (define ConvolutionParameterfv (foreign-lambda void "ConvolutionParameterfv" unsigned-integer unsigned-integer f32vector))) (begin (define ConvolutionParameteri (foreign-lambda void "ConvolutionParameteri" unsigned-integer unsigned-integer integer))) (begin (define ConvolutionParameteriv (foreign-lambda void "ConvolutionParameteriv" unsigned-integer unsigned-integer s32vector))) (begin (define CopyConvolutionFilter1D (foreign-lambda void "CopyConvolutionFilter1D" unsigned-integer unsigned-integer integer integer unsigned-integer))) (begin (define CopyConvolutionFilter2D (foreign-lambda void "CopyConvolutionFilter2D" unsigned-integer unsigned-integer integer integer unsigned-integer unsigned-integer))) (begin (define GetConvolutionFilter (foreign-lambda void "GetConvolutionFilter" unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetConvolutionParameterfv (foreign-lambda void "GetConvolutionParameterfv" unsigned-integer unsigned-integer f32vector))) (begin (define GetConvolutionParameteriv (foreign-lambda void "GetConvolutionParameteriv" unsigned-integer unsigned-integer s32vector))) (begin (define GetSeparableFilter (foreign-lambda void "GetSeparableFilter" unsigned-integer unsigned-integer unsigned-integer (c-pointer void) (c-pointer void) (c-pointer void)))) (begin (define SeparableFilter2D (foreign-lambda void "SeparableFilter2D" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void) (c-pointer void)))) (begin (define GetHistogram (foreign-lambda void "GetHistogram" unsigned-integer unsigned-char unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetHistogramParameterfv (foreign-lambda void "GetHistogramParameterfv" unsigned-integer unsigned-integer f32vector))) (begin (define GetHistogramParameteriv (foreign-lambda void "GetHistogramParameteriv" unsigned-integer unsigned-integer s32vector))) (begin (define GetMinmax (foreign-lambda void "GetMinmax" unsigned-integer unsigned-char unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetMinmaxParameterfv (foreign-lambda void "GetMinmaxParameterfv" unsigned-integer unsigned-integer f32vector))) (begin (define GetMinmaxParameteriv (foreign-lambda void "GetMinmaxParameteriv" unsigned-integer unsigned-integer s32vector))) (begin (define Histogram (foreign-lambda void "Histogram" unsigned-integer unsigned-integer unsigned-integer unsigned-char))) (begin (define Minmax (foreign-lambda void "Minmax" unsigned-integer unsigned-integer unsigned-char))) (begin (define ResetHistogram (foreign-lambda void "ResetHistogram" unsigned-integer))) (begin (define ResetMinmax (foreign-lambda void "ResetMinmax" unsigned-integer))) (begin (define ActiveTexture (foreign-lambda void "ActiveTexture" unsigned-integer))) (begin (define ClientActiveTexture (foreign-lambda void "ClientActiveTexture" unsigned-integer))) (begin (define MultiTexCoord1d (foreign-lambda void "MultiTexCoord1d" unsigned-integer double))) (begin (define MultiTexCoord1dv (foreign-lambda void "MultiTexCoord1dv" unsigned-integer f64vector))) (begin (define MultiTexCoord1f (foreign-lambda void "MultiTexCoord1f" unsigned-integer float))) (begin (define MultiTexCoord1fv (foreign-lambda void "MultiTexCoord1fv" unsigned-integer f32vector))) (begin (define MultiTexCoord1i (foreign-lambda void "MultiTexCoord1i" unsigned-integer integer))) (begin (define MultiTexCoord1iv (foreign-lambda void "MultiTexCoord1iv" unsigned-integer s32vector))) (begin (define MultiTexCoord1s (foreign-lambda void "MultiTexCoord1s" unsigned-integer short))) (begin (define MultiTexCoord1sv (foreign-lambda void "MultiTexCoord1sv" unsigned-integer s16vector))) (begin (define MultiTexCoord2d (foreign-lambda void "MultiTexCoord2d" unsigned-integer double double))) (begin (define MultiTexCoord2dv (foreign-lambda void "MultiTexCoord2dv" unsigned-integer f64vector))) (begin (define MultiTexCoord2f (foreign-lambda void "MultiTexCoord2f" unsigned-integer float float))) (begin (define MultiTexCoord2fv (foreign-lambda void "MultiTexCoord2fv" unsigned-integer f32vector))) (begin (define MultiTexCoord2i (foreign-lambda void "MultiTexCoord2i" unsigned-integer integer integer))) (begin (define MultiTexCoord2iv (foreign-lambda void "MultiTexCoord2iv" unsigned-integer s32vector))) (begin (define MultiTexCoord2s (foreign-lambda void "MultiTexCoord2s" unsigned-integer short short))) (begin (define MultiTexCoord2sv (foreign-lambda void "MultiTexCoord2sv" unsigned-integer s16vector))) (begin (define MultiTexCoord3d (foreign-lambda void "MultiTexCoord3d" unsigned-integer double double double))) (begin (define MultiTexCoord3dv (foreign-lambda void "MultiTexCoord3dv" unsigned-integer f64vector))) (begin (define MultiTexCoord3f (foreign-lambda void "MultiTexCoord3f" unsigned-integer float float float))) (begin (define MultiTexCoord3fv (foreign-lambda void "MultiTexCoord3fv" unsigned-integer f32vector))) (begin (define MultiTexCoord3i (foreign-lambda void "MultiTexCoord3i" unsigned-integer integer integer integer))) (begin (define MultiTexCoord3iv (foreign-lambda void "MultiTexCoord3iv" unsigned-integer s32vector))) (begin (define MultiTexCoord3s (foreign-lambda void "MultiTexCoord3s" unsigned-integer short short short))) (begin (define MultiTexCoord3sv (foreign-lambda void "MultiTexCoord3sv" unsigned-integer s16vector))) (begin (define MultiTexCoord4d (foreign-lambda void "MultiTexCoord4d" unsigned-integer double double double double))) (begin (define MultiTexCoord4dv (foreign-lambda void "MultiTexCoord4dv" unsigned-integer f64vector))) (begin (define MultiTexCoord4f (foreign-lambda void "MultiTexCoord4f" unsigned-integer float float float float))) (begin (define MultiTexCoord4fv (foreign-lambda void "MultiTexCoord4fv" unsigned-integer f32vector))) (begin (define MultiTexCoord4i (foreign-lambda void "MultiTexCoord4i" unsigned-integer integer integer integer integer))) (begin (define MultiTexCoord4iv (foreign-lambda void "MultiTexCoord4iv" unsigned-integer s32vector))) (begin (define MultiTexCoord4s (foreign-lambda void "MultiTexCoord4s" unsigned-integer short short short short))) (begin (define MultiTexCoord4sv (foreign-lambda void "MultiTexCoord4sv" unsigned-integer s16vector))) (begin (define LoadTransposeMatrixf (foreign-lambda void "LoadTransposeMatrixf" f32vector))) (begin (define LoadTransposeMatrixd (foreign-lambda void "LoadTransposeMatrixd" f64vector))) (begin (define MultTransposeMatrixf (foreign-lambda void "MultTransposeMatrixf" f32vector))) (begin (define MultTransposeMatrixd (foreign-lambda void "MultTransposeMatrixd" f64vector))) (begin (define SampleCoverage (foreign-lambda void "SampleCoverage" float unsigned-char))) (begin (define CompressedTexImage3D (foreign-lambda void "CompressedTexImage3D" unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer (c-pointer void)))) (begin (define CompressedTexImage2D (foreign-lambda void "CompressedTexImage2D" unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer (c-pointer void)))) (begin (define CompressedTexImage1D (foreign-lambda void "CompressedTexImage1D" unsigned-integer integer unsigned-integer unsigned-integer integer unsigned-integer (c-pointer void)))) (begin (define CompressedTexSubImage3D (foreign-lambda void "CompressedTexSubImage3D" unsigned-integer integer integer integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define CompressedTexSubImage2D (foreign-lambda void "CompressedTexSubImage2D" unsigned-integer integer integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define CompressedTexSubImage1D (foreign-lambda void "CompressedTexSubImage1D" unsigned-integer integer integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetCompressedTexImage (foreign-lambda void "GetCompressedTexImage" unsigned-integer integer (c-pointer void)))) (begin (define BlendFuncSeparate (foreign-lambda void "BlendFuncSeparate" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define FogCoordf (foreign-lambda void "FogCoordf" float))) (begin (define FogCoordfv (foreign-lambda void "FogCoordfv" f32vector))) (begin (define FogCoordd (foreign-lambda void "FogCoordd" double))) (begin (define FogCoorddv (foreign-lambda void "FogCoorddv" f64vector))) (begin (define FogCoordPointer (foreign-lambda void "FogCoordPointer" unsigned-integer unsigned-integer (c-pointer void)))) (begin (define MultiDrawArrays (foreign-lambda void "MultiDrawArrays" unsigned-integer s32vector u32vector unsigned-integer))) (begin (define MultiDrawElements (foreign-lambda void "MultiDrawElements" unsigned-integer u32vector unsigned-integer (c-pointer (c-pointer (const void))) unsigned-integer))) (begin (define PointParameterf (foreign-lambda void "PointParameterf" unsigned-integer float))) (begin (define PointParameterfv (foreign-lambda void "PointParameterfv" unsigned-integer f32vector))) (begin (define PointParameteri (foreign-lambda void "PointParameteri" unsigned-integer integer))) (begin (define PointParameteriv (foreign-lambda void "PointParameteriv" unsigned-integer s32vector))) (begin (define SecondaryColor3b (foreign-lambda void "SecondaryColor3b" char char char))) (begin (define SecondaryColor3bv (foreign-lambda void "SecondaryColor3bv" c-string))) (begin (define SecondaryColor3d (foreign-lambda void "SecondaryColor3d" double double double))) (begin (define SecondaryColor3dv (foreign-lambda void "SecondaryColor3dv" f64vector))) (begin (define SecondaryColor3f (foreign-lambda void "SecondaryColor3f" float float float))) (begin (define SecondaryColor3fv (foreign-lambda void "SecondaryColor3fv" f32vector))) (begin (define SecondaryColor3i (foreign-lambda void "SecondaryColor3i" integer integer integer))) (begin (define SecondaryColor3iv (foreign-lambda void "SecondaryColor3iv" s32vector))) (begin (define SecondaryColor3s (foreign-lambda void "SecondaryColor3s" short short short))) (begin (define SecondaryColor3sv (foreign-lambda void "SecondaryColor3sv" s16vector))) (begin (define SecondaryColor3ub (foreign-lambda void "SecondaryColor3ub" unsigned-char unsigned-char unsigned-char))) (begin (define SecondaryColor3ubv (foreign-lambda void "SecondaryColor3ubv" u8vector))) (begin (define SecondaryColor3ui (foreign-lambda void "SecondaryColor3ui" unsigned-integer unsigned-integer unsigned-integer))) (begin (define SecondaryColor3uiv (foreign-lambda void "SecondaryColor3uiv" u32vector))) (begin (define SecondaryColor3us (foreign-lambda void "SecondaryColor3us" unsigned-short unsigned-short unsigned-short))) (begin (define SecondaryColor3usv (foreign-lambda void "SecondaryColor3usv" u16vector))) (begin (define SecondaryColorPointer (foreign-lambda void "SecondaryColorPointer" integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define WindowPos2d (foreign-lambda void "WindowPos2d" double double))) (begin (define WindowPos2dv (foreign-lambda void "WindowPos2dv" f64vector))) (begin (define WindowPos2f (foreign-lambda void "WindowPos2f" float float))) (begin (define WindowPos2fv (foreign-lambda void "WindowPos2fv" f32vector))) (begin (define WindowPos2i (foreign-lambda void "WindowPos2i" integer integer))) (begin (define WindowPos2iv (foreign-lambda void "WindowPos2iv" s32vector))) (begin (define WindowPos2s (foreign-lambda void "WindowPos2s" short short))) (begin (define WindowPos2sv (foreign-lambda void "WindowPos2sv" s16vector))) (begin (define WindowPos3d (foreign-lambda void "WindowPos3d" double double double))) (begin (define WindowPos3dv (foreign-lambda void "WindowPos3dv" f64vector))) (begin (define WindowPos3f (foreign-lambda void "WindowPos3f" float float float))) (begin (define WindowPos3fv (foreign-lambda void "WindowPos3fv" f32vector))) (begin (define WindowPos3i (foreign-lambda void "WindowPos3i" integer integer integer))) (begin (define WindowPos3iv (foreign-lambda void "WindowPos3iv" s32vector))) (begin (define WindowPos3s (foreign-lambda void "WindowPos3s" short short short))) (begin (define WindowPos3sv (foreign-lambda void "WindowPos3sv" s16vector))) (begin (define BindBuffer (foreign-lambda void "BindBuffer" unsigned-integer unsigned-integer))) (begin (define DeleteBuffers (foreign-lambda void "DeleteBuffers" unsigned-integer u32vector))) (begin (define GenBuffers (foreign-lambda void "GenBuffers" unsigned-integer u32vector))) (begin (define IsBuffer (foreign-lambda unsigned-char "IsBuffer" unsigned-integer))) (begin (define BufferData (foreign-lambda void "BufferData" unsigned-integer integer (c-pointer void) unsigned-integer))) (begin (define BufferSubData (foreign-lambda void "BufferSubData" unsigned-integer integer integer (c-pointer void)))) (begin (define GetBufferSubData (foreign-lambda void "GetBufferSubData" unsigned-integer integer integer (c-pointer void)))) (begin (define MapBuffer (foreign-lambda (c-pointer void) "MapBuffer" unsigned-integer unsigned-integer))) (begin (define UnmapBuffer (foreign-lambda unsigned-char "UnmapBuffer" unsigned-integer))) (begin (define GetBufferParameteriv (foreign-lambda void "GetBufferParameteriv" unsigned-integer unsigned-integer s32vector))) (begin (define GetBufferPointerv (foreign-lambda void "GetBufferPointerv" unsigned-integer unsigned-integer (c-pointer (c-pointer void))))) (begin (define GenQueries (foreign-lambda void "GenQueries" unsigned-integer u32vector))) (begin (define DeleteQueries (foreign-lambda void "DeleteQueries" unsigned-integer u32vector))) (begin (define IsQuery (foreign-lambda unsigned-char "IsQuery" unsigned-integer))) (begin (define BeginQuery (foreign-lambda void "BeginQuery" unsigned-integer unsigned-integer))) (begin (define EndQuery (foreign-lambda void "EndQuery" unsigned-integer))) (begin (define GetQueryiv (foreign-lambda void "GetQueryiv" unsigned-integer unsigned-integer s32vector))) (begin (define GetQueryObjectiv (foreign-lambda void "GetQueryObjectiv" unsigned-integer unsigned-integer s32vector))) (begin (define GetQueryObjectuiv (foreign-lambda void "GetQueryObjectuiv" unsigned-integer unsigned-integer u32vector))) (begin (define BlendEquationSeparate (foreign-lambda void "BlendEquationSeparate" unsigned-integer unsigned-integer))) (begin (define CreateProgram (foreign-lambda unsigned-integer "CreateProgram"))) (begin (define CreateShader (foreign-lambda unsigned-integer "CreateShader" unsigned-integer))) (begin (define DeleteProgram (foreign-lambda void "DeleteProgram" unsigned-integer))) (begin (define DeleteShader (foreign-lambda void "DeleteShader" unsigned-integer))) (begin (define AttachShader (foreign-lambda void "AttachShader" unsigned-integer unsigned-integer))) (begin (define DetachShader (foreign-lambda void "DetachShader" unsigned-integer unsigned-integer))) (begin (define ShaderSource (foreign-lambda void "ShaderSource" unsigned-integer (c-pointer (c-pointer (const char))) s32vector))) (begin (define CompileShader (foreign-lambda void "CompileShader" unsigned-integer))) (begin (define IsProgram (foreign-lambda unsigned-char "IsProgram" unsigned-integer))) (begin (define IsShader (foreign-lambda unsigned-char "IsShader" unsigned-integer))) (begin (define LinkProgram (foreign-lambda void "LinkProgram" unsigned-integer))) (begin (define UseProgram (foreign-lambda void "UseProgram" unsigned-integer))) (begin (define ValidateProgram (foreign-lambda void "ValidateProgram" unsigned-integer))) (begin (define Uniform1f (foreign-lambda void "Uniform1f" integer float))) (begin (define Uniform2f (foreign-lambda void "Uniform2f" integer float float))) (begin (define Uniform3f (foreign-lambda void "Uniform3f" integer float float float))) (begin (define Uniform4f (foreign-lambda void "Uniform4f" integer float float float float))) (begin (define Uniform1i (foreign-lambda void "Uniform1i" integer integer))) (begin (define Uniform2i (foreign-lambda void "Uniform2i" integer integer integer))) (begin (define Uniform3i (foreign-lambda void "Uniform3i" integer integer integer integer))) (begin (define Uniform4i (foreign-lambda void "Uniform4i" integer integer integer integer integer))) (begin (define Uniform1fv (foreign-lambda void "Uniform1fv" integer unsigned-integer f32vector))) (begin (define Uniform2fv (foreign-lambda void "Uniform2fv" integer unsigned-integer f32vector))) (begin (define Uniform3fv (foreign-lambda void "Uniform3fv" integer unsigned-integer f32vector))) (begin (define Uniform4fv (foreign-lambda void "Uniform4fv" integer unsigned-integer f32vector))) (begin (define Uniform1iv (foreign-lambda void "Uniform1iv" integer unsigned-integer s32vector))) (begin (define Uniform2iv (foreign-lambda void "Uniform2iv" integer unsigned-integer s32vector))) (begin (define Uniform3iv (foreign-lambda void "Uniform3iv" integer unsigned-integer s32vector))) (begin (define Uniform4iv (foreign-lambda void "Uniform4iv" integer unsigned-integer s32vector))) (begin (define UniformMatrix2fv (foreign-lambda void "UniformMatrix2fv" integer unsigned-integer unsigned-char f32vector))) (begin (define UniformMatrix3fv (foreign-lambda void "UniformMatrix3fv" integer unsigned-integer unsigned-char f32vector))) (begin (define UniformMatrix4fv (foreign-lambda void "UniformMatrix4fv" integer unsigned-integer unsigned-char f32vector))) (begin (define GetShaderfv (foreign-lambda void "GetShaderfv" unsigned-integer unsigned-integer f32vector))) (begin (define GetShaderiv (foreign-lambda void "GetShaderiv" unsigned-integer unsigned-integer s32vector))) (begin (define GetProgramfv (foreign-lambda void "GetProgramfv" unsigned-integer unsigned-integer f32vector))) (begin (define GetProgramiv (foreign-lambda void "GetProgramiv" unsigned-integer unsigned-integer s32vector))) (begin (define GetShaderInfoLog (foreign-lambda void "GetShaderInfoLog" unsigned-integer unsigned-integer u32vector c-string))) (begin (define GetProgramInfoLog (foreign-lambda void "GetProgramInfoLog" unsigned-integer unsigned-integer u32vector c-string))) (begin (define GetAttachedShaders (foreign-lambda void "GetAttachedShaders" unsigned-integer unsigned-integer u32vector u32vector))) (begin (define GetUniformLocation (foreign-lambda integer "GetUniformLocation" unsigned-integer c-string))) (begin (define GetActiveUniform (foreign-lambda void "GetActiveUniform" unsigned-integer unsigned-integer u32vector s32vector u32vector c-string))) (begin (define GetUniformfv (foreign-lambda void "GetUniformfv" unsigned-integer f32vector))) (begin (define GetUniformiv (foreign-lambda void "GetUniformiv" unsigned-integer s32vector))) (begin (define GetShaderSource (foreign-lambda void "GetShaderSource" unsigned-integer u32vector c-string))) (begin (define VertexAttrib1f (foreign-lambda void "VertexAttrib1f" unsigned-integer float))) (begin (define VertexAttrib1s (foreign-lambda void "VertexAttrib1s" unsigned-integer short))) (begin (define VertexAttrib1d (foreign-lambda void "VertexAttrib1d" unsigned-integer double))) (begin (define VertexAttrib2f (foreign-lambda void "VertexAttrib2f" unsigned-integer float float))) (begin (define VertexAttrib2s (foreign-lambda void "VertexAttrib2s" unsigned-integer short short))) (begin (define VertexAttrib2d (foreign-lambda void "VertexAttrib2d" unsigned-integer double double))) (begin (define VertexAttrib3f (foreign-lambda void "VertexAttrib3f" unsigned-integer float float float))) (begin (define VertexAttrib3s (foreign-lambda void "VertexAttrib3s" unsigned-integer short short short))) (begin (define VertexAttrib3d (foreign-lambda void "VertexAttrib3d" unsigned-integer double double double))) (begin (define VertexAttrib4f (foreign-lambda void "VertexAttrib4f" unsigned-integer float float float float))) (begin (define VertexAttrib4s (foreign-lambda void "VertexAttrib4s" unsigned-integer short short short short))) (begin (define VertexAttrib4d (foreign-lambda void "VertexAttrib4d" unsigned-integer double double double double))) (begin (define VertexAttrib4Nub (foreign-lambda void "VertexAttrib4Nub" unsigned-integer unsigned-char unsigned-char unsigned-char unsigned-char))) (begin (define VertexAttrib1fv (foreign-lambda void "VertexAttrib1fv" unsigned-integer f32vector))) (begin (define VertexAttrib1sv (foreign-lambda void "VertexAttrib1sv" unsigned-integer s16vector))) (begin (define VertexAttrib1dv (foreign-lambda void "VertexAttrib1dv" unsigned-integer f64vector))) (begin (define VertexAttrib2fv (foreign-lambda void "VertexAttrib2fv" unsigned-integer f32vector))) (begin (define VertexAttrib2sv (foreign-lambda void "VertexAttrib2sv" unsigned-integer s16vector))) (begin (define VertexAttrib2dv (foreign-lambda void "VertexAttrib2dv" unsigned-integer f64vector))) (begin (define VertexAttrib3fv (foreign-lambda void "VertexAttrib3fv" unsigned-integer f32vector))) (begin (define VertexAttrib3sv (foreign-lambda void "VertexAttrib3sv" unsigned-integer s16vector))) (begin (define VertexAttrib3dv (foreign-lambda void "VertexAttrib3dv" unsigned-integer f64vector))) (begin (define VertexAttrib4fv (foreign-lambda void "VertexAttrib4fv" unsigned-integer f32vector))) (begin (define VertexAttrib4sv (foreign-lambda void "VertexAttrib4sv" unsigned-integer s16vector))) (begin (define VertexAttrib4dv (foreign-lambda void "VertexAttrib4dv" unsigned-integer f64vector))) (begin (define VertexAttrib4iv (foreign-lambda void "VertexAttrib4iv" unsigned-integer s32vector))) (begin (define VertexAttrib4bv (foreign-lambda void "VertexAttrib4bv" unsigned-integer c-string))) (begin (define VertexAttrib4ubv (foreign-lambda void "VertexAttrib4ubv" unsigned-integer u8vector))) (begin (define VertexAttrib4usv (foreign-lambda void "VertexAttrib4usv" unsigned-integer u16vector))) (begin (define VertexAttrib4uiv (foreign-lambda void "VertexAttrib4uiv" unsigned-integer u32vector))) (begin (define VertexAttrib4Nbv (foreign-lambda void "VertexAttrib4Nbv" unsigned-integer c-string))) (begin (define VertexAttrib4Nsv (foreign-lambda void "VertexAttrib4Nsv" unsigned-integer s16vector))) (begin (define VertexAttrib4Niv (foreign-lambda void "VertexAttrib4Niv" unsigned-integer s32vector))) (begin (define VertexAttrib4Nubv (foreign-lambda void "VertexAttrib4Nubv" unsigned-integer u8vector))) (begin (define VertexAttrib4Nusv (foreign-lambda void "VertexAttrib4Nusv" unsigned-integer u16vector))) (begin (define VertexAttrib4Nuiv (foreign-lambda void "VertexAttrib4Nuiv" unsigned-integer u32vector))) (begin (define VertexAttribPointer (foreign-lambda void "VertexAttribPointer" unsigned-integer unsigned-integer unsigned-char unsigned-integer (c-pointer void)))) (begin (define EnableVertexAttribArray (foreign-lambda void "EnableVertexAttribArray" unsigned-integer))) (begin (define DisableVertexAttribArray (foreign-lambda void "DisableVertexAttribArray" unsigned-integer))) (begin (define BindAttribLocation (foreign-lambda void "BindAttribLocation" unsigned-integer unsigned-integer c-string))) (begin (define GetActiveAttrib (foreign-lambda void "GetActiveAttrib" unsigned-integer unsigned-integer unsigned-integer u32vector s32vector u32vector c-string))) (begin (define GetAttribLocation (foreign-lambda integer "GetAttribLocation" unsigned-integer c-string))) (begin (define GetVertexAttribdv (foreign-lambda void "GetVertexAttribdv" unsigned-integer unsigned-integer f64vector))) (begin (define GetVertexAttribfv (foreign-lambda void "GetVertexAttribfv" unsigned-integer unsigned-integer f32vector))) (begin (define GetVertexAttribiv (foreign-lambda void "GetVertexAttribiv" unsigned-integer unsigned-integer s32vector))) (begin (define GetVertexAttribPointerv (foreign-lambda void "GetVertexAttribPointerv" unsigned-integer unsigned-integer (c-pointer (c-pointer void))))) (begin (define DrawBuffers (foreign-lambda void "DrawBuffers" unsigned-integer u32vector))) (begin (define StencilOpSeparate (foreign-lambda void "StencilOpSeparate" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define StencilFuncSeparate (foreign-lambda void "StencilFuncSeparate" unsigned-integer unsigned-integer integer unsigned-integer))) (begin (define UniformMatrix2x3fv (foreign-lambda void "UniformMatrix2x3fv" integer unsigned-integer unsigned-char f32vector))) (begin (define UniformMatrix3x2fv (foreign-lambda void "UniformMatrix3x2fv" integer unsigned-integer unsigned-char f32vector))) (begin (define UniformMatrix2x4fv (foreign-lambda void "UniformMatrix2x4fv" integer unsigned-integer unsigned-char f32vector))) (begin (define UniformMatrix4x2fv (foreign-lambda void "UniformMatrix4x2fv" integer unsigned-integer unsigned-char f32vector))) (begin (define UniformMatrix3x4fv (foreign-lambda void "UniformMatrix3x4fv" integer unsigned-integer unsigned-char f32vector))) (begin (define UniformMatrix4x3fv (foreign-lambda void "UniformMatrix4x3fv" integer unsigned-integer unsigned-char f32vector))) (begin (define ColorMaski (foreign-lambda void "ColorMaski" unsigned-integer unsigned-char unsigned-char unsigned-char unsigned-char))) (begin (define GetBooleani_v (foreign-lambda void "GetBooleani_v" unsigned-integer unsigned-integer u8vector))) (begin (define GetIntegeri_v (foreign-lambda void "GetIntegeri_v" unsigned-integer unsigned-integer s32vector))) (begin (define Enablei (foreign-lambda void "Enablei" unsigned-integer unsigned-integer))) (begin (define Disablei (foreign-lambda void "Disablei" unsigned-integer unsigned-integer))) (begin (define IsEnabledi (foreign-lambda unsigned-char "IsEnabledi" unsigned-integer unsigned-integer))) (begin (define BeginTransformFeedback (foreign-lambda void "BeginTransformFeedback" unsigned-integer))) (begin (define EndTransformFeedback (foreign-lambda void "EndTransformFeedback"))) (begin (define BindBufferRange (foreign-lambda void "BindBufferRange" unsigned-integer unsigned-integer unsigned-integer integer integer))) (begin (define BindBufferBase (foreign-lambda void "BindBufferBase" unsigned-integer unsigned-integer unsigned-integer))) (begin (define TransformFeedbackVaryings (foreign-lambda void "TransformFeedbackVaryings" unsigned-integer unsigned-integer s32vector unsigned-integer))) (begin (define GetTransformFeedbackVarying (foreign-lambda void "GetTransformFeedbackVarying" unsigned-integer unsigned-integer s32vector))) (begin (define ClampColor (foreign-lambda void "ClampColor" unsigned-integer unsigned-integer))) (begin (define BeginConditionalRender (foreign-lambda void "BeginConditionalRender" unsigned-integer unsigned-integer))) (begin (define EndConditionalRender (foreign-lambda void "EndConditionalRender"))) (begin (define VertexAttribI1i (foreign-lambda void "VertexAttribI1i" unsigned-integer integer))) (begin (define VertexAttribI2i (foreign-lambda void "VertexAttribI2i" unsigned-integer integer integer))) (begin (define VertexAttribI3i (foreign-lambda void "VertexAttribI3i" unsigned-integer integer integer integer))) (begin (define VertexAttribI4i (foreign-lambda void "VertexAttribI4i" unsigned-integer integer integer integer integer))) (begin (define VertexAttribI1ui (foreign-lambda void "VertexAttribI1ui" unsigned-integer unsigned-integer))) (begin (define VertexAttribI2ui (foreign-lambda void "VertexAttribI2ui" unsigned-integer unsigned-integer unsigned-integer))) (begin (define VertexAttribI3ui (foreign-lambda void "VertexAttribI3ui" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define VertexAttribI4ui (foreign-lambda void "VertexAttribI4ui" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define VertexAttribI1iv (foreign-lambda void "VertexAttribI1iv" unsigned-integer s32vector))) (begin (define VertexAttribI2iv (foreign-lambda void "VertexAttribI2iv" unsigned-integer s32vector))) (begin (define VertexAttribI3iv (foreign-lambda void "VertexAttribI3iv" unsigned-integer s32vector))) (begin (define VertexAttribI4iv (foreign-lambda void "VertexAttribI4iv" unsigned-integer s32vector))) (begin (define VertexAttribI1uiv (foreign-lambda void "VertexAttribI1uiv" unsigned-integer u32vector))) (begin (define VertexAttribI2uiv (foreign-lambda void "VertexAttribI2uiv" unsigned-integer u32vector))) (begin (define VertexAttribI3uiv (foreign-lambda void "VertexAttribI3uiv" unsigned-integer u32vector))) (begin (define VertexAttribI4uiv (foreign-lambda void "VertexAttribI4uiv" unsigned-integer u32vector))) (begin (define VertexAttribI4bv (foreign-lambda void "VertexAttribI4bv" unsigned-integer c-string))) (begin (define VertexAttribI4sv (foreign-lambda void "VertexAttribI4sv" unsigned-integer s16vector))) (begin (define VertexAttribI4ubv (foreign-lambda void "VertexAttribI4ubv" unsigned-integer u8vector))) (begin (define VertexAttribI4usv (foreign-lambda void "VertexAttribI4usv" unsigned-integer u16vector))) (begin (define VertexAttribIPointer (foreign-lambda void "VertexAttribIPointer" unsigned-integer integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetVertexAttribIiv (foreign-lambda void "GetVertexAttribIiv" unsigned-integer unsigned-integer s32vector))) (begin (define GetVertexAttribIuiv (foreign-lambda void "GetVertexAttribIuiv" unsigned-integer unsigned-integer u32vector))) (begin (define GetUniformuiv (foreign-lambda void "GetUniformuiv" unsigned-integer integer u32vector))) (begin (define BindFragDataLocation (foreign-lambda void "BindFragDataLocation" unsigned-integer unsigned-integer c-string))) (begin (define GetFragDataLocation (foreign-lambda integer "GetFragDataLocation" unsigned-integer c-string))) (begin (define Uniform1ui (foreign-lambda void "Uniform1ui" integer unsigned-integer))) (begin (define Uniform2ui (foreign-lambda void "Uniform2ui" integer unsigned-integer unsigned-integer))) (begin (define Uniform3ui (foreign-lambda void "Uniform3ui" integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define Uniform4ui (foreign-lambda void "Uniform4ui" integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define Uniform1uiv (foreign-lambda void "Uniform1uiv" integer unsigned-integer u32vector))) (begin (define Uniform2uiv (foreign-lambda void "Uniform2uiv" integer unsigned-integer u32vector))) (begin (define Uniform3uiv (foreign-lambda void "Uniform3uiv" integer unsigned-integer u32vector))) (begin (define Uniform4uiv (foreign-lambda void "Uniform4uiv" integer unsigned-integer u32vector))) (begin (define TexParameterIiv (foreign-lambda void "TexParameterIiv" unsigned-integer unsigned-integer s32vector))) (begin (define TexParameterIuiv (foreign-lambda void "TexParameterIuiv" unsigned-integer unsigned-integer u32vector))) (begin (define GetTexParameterIiv (foreign-lambda void "GetTexParameterIiv" unsigned-integer unsigned-integer s32vector))) (begin (define GetTexParameterIuiv (foreign-lambda void "GetTexParameterIuiv" unsigned-integer unsigned-integer u32vector))) (begin (define ClearBufferiv (foreign-lambda void "ClearBufferiv" unsigned-integer integer s32vector))) (begin (define ClearBufferuiv (foreign-lambda void "ClearBufferuiv" unsigned-integer integer u32vector))) (begin (define ClearBufferfv (foreign-lambda void "ClearBufferfv" unsigned-integer integer f32vector))) (begin (define ClearBufferfi (foreign-lambda void "ClearBufferfi" unsigned-integer integer float integer))) (begin (define GetStringi (foreign-lambda (c-pointer (const unsigned-char)) "GetStringi" unsigned-integer unsigned-integer))) (begin (define DrawArraysInstanced (foreign-lambda void "DrawArraysInstanced" unsigned-integer integer unsigned-integer unsigned-integer))) (begin (define DrawElementsInstanced (foreign-lambda void "DrawElementsInstanced" unsigned-integer unsigned-integer unsigned-integer (c-pointer void) unsigned-integer))) (begin (define TexBuffer (foreign-lambda void "TexBuffer" unsigned-integer unsigned-integer unsigned-integer))) (begin (define PrimitiveRestartIndex (foreign-lambda void "PrimitiveRestartIndex" unsigned-integer))) (begin (define glGetInteger64i_v (foreign-lambda void "glGetInteger64i_v" unsigned-integer unsigned-integer s32vector))) (begin (define glGetBufferParameteri64v (foreign-lambda void "glGetBufferParameteri64v" unsigned-integer unsigned-integer s32vector))) (begin (define glProgramParameteri (foreign-lambda void "glProgramParameteri" unsigned-integer unsigned-integer integer))) (begin (define glFramebufferTexture (foreign-lambda void "glFramebufferTexture" unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define ActiveTextureARB (foreign-lambda void "ActiveTextureARB" unsigned-integer))) (begin (define ClientActiveTextureARB (foreign-lambda void "ClientActiveTextureARB" unsigned-integer))) (begin (define MultiTexCoord1dARB (foreign-lambda void "MultiTexCoord1dARB" unsigned-integer double))) (begin (define MultiTexCoord1dvARB (foreign-lambda void "MultiTexCoord1dvARB" unsigned-integer f64vector))) (begin (define MultiTexCoord1fARB (foreign-lambda void "MultiTexCoord1fARB" unsigned-integer float))) (begin (define MultiTexCoord1fvARB (foreign-lambda void "MultiTexCoord1fvARB" unsigned-integer f32vector))) (begin (define MultiTexCoord1iARB (foreign-lambda void "MultiTexCoord1iARB" unsigned-integer integer))) (begin (define MultiTexCoord1ivARB (foreign-lambda void "MultiTexCoord1ivARB" unsigned-integer s32vector))) (begin (define MultiTexCoord1sARB (foreign-lambda void "MultiTexCoord1sARB" unsigned-integer short))) (begin (define MultiTexCoord1svARB (foreign-lambda void "MultiTexCoord1svARB" unsigned-integer s16vector))) (begin (define MultiTexCoord2dARB (foreign-lambda void "MultiTexCoord2dARB" unsigned-integer double double))) (begin (define MultiTexCoord2dvARB (foreign-lambda void "MultiTexCoord2dvARB" unsigned-integer f64vector))) (begin (define MultiTexCoord2fARB (foreign-lambda void "MultiTexCoord2fARB" unsigned-integer float float))) (begin (define MultiTexCoord2fvARB (foreign-lambda void "MultiTexCoord2fvARB" unsigned-integer f32vector))) (begin (define MultiTexCoord2iARB (foreign-lambda void "MultiTexCoord2iARB" unsigned-integer integer integer))) (begin (define MultiTexCoord2ivARB (foreign-lambda void "MultiTexCoord2ivARB" unsigned-integer s32vector))) (begin (define MultiTexCoord2sARB (foreign-lambda void "MultiTexCoord2sARB" unsigned-integer short short))) (begin (define MultiTexCoord2svARB (foreign-lambda void "MultiTexCoord2svARB" unsigned-integer s16vector))) (begin (define MultiTexCoord3dARB (foreign-lambda void "MultiTexCoord3dARB" unsigned-integer double double double))) (begin (define MultiTexCoord3dvARB (foreign-lambda void "MultiTexCoord3dvARB" unsigned-integer f64vector))) (begin (define MultiTexCoord3fARB (foreign-lambda void "MultiTexCoord3fARB" unsigned-integer float float float))) (begin (define MultiTexCoord3fvARB (foreign-lambda void "MultiTexCoord3fvARB" unsigned-integer f32vector))) (begin (define MultiTexCoord3iARB (foreign-lambda void "MultiTexCoord3iARB" unsigned-integer integer integer integer))) (begin (define MultiTexCoord3ivARB (foreign-lambda void "MultiTexCoord3ivARB" unsigned-integer s32vector))) (begin (define MultiTexCoord3sARB (foreign-lambda void "MultiTexCoord3sARB" unsigned-integer short short short))) (begin (define MultiTexCoord3svARB (foreign-lambda void "MultiTexCoord3svARB" unsigned-integer s16vector))) (begin (define MultiTexCoord4dARB (foreign-lambda void "MultiTexCoord4dARB" unsigned-integer double double double double))) (begin (define MultiTexCoord4dvARB (foreign-lambda void "MultiTexCoord4dvARB" unsigned-integer f64vector))) (begin (define MultiTexCoord4fARB (foreign-lambda void "MultiTexCoord4fARB" unsigned-integer float float float float))) (begin (define MultiTexCoord4fvARB (foreign-lambda void "MultiTexCoord4fvARB" unsigned-integer f32vector))) (begin (define MultiTexCoord4iARB (foreign-lambda void "MultiTexCoord4iARB" unsigned-integer integer integer integer integer))) (begin (define MultiTexCoord4ivARB (foreign-lambda void "MultiTexCoord4ivARB" unsigned-integer s32vector))) (begin (define MultiTexCoord4sARB (foreign-lambda void "MultiTexCoord4sARB" unsigned-integer short short short short))) (begin (define MultiTexCoord4svARB (foreign-lambda void "MultiTexCoord4svARB" unsigned-integer s16vector))) (begin (define LoadTransposeMatrixfARB (foreign-lambda void "LoadTransposeMatrixfARB" f32vector))) (begin (define LoadTransposeMatrixdARB (foreign-lambda void "LoadTransposeMatrixdARB" f64vector))) (begin (define MultTransposeMatrixfARB (foreign-lambda void "MultTransposeMatrixfARB" f32vector))) (begin (define MultTransposeMatrixdARB (foreign-lambda void "MultTransposeMatrixdARB" f64vector))) (begin (define SampleCoverageARB (foreign-lambda void "SampleCoverageARB" float unsigned-char))) (begin (define CompressedTexImage3DARB (foreign-lambda void "CompressedTexImage3DARB" unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer (c-pointer void)))) (begin (define CompressedTexImage2DARB (foreign-lambda void "CompressedTexImage2DARB" unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer (c-pointer void)))) (begin (define CompressedTexImage1DARB (foreign-lambda void "CompressedTexImage1DARB" unsigned-integer integer unsigned-integer unsigned-integer integer unsigned-integer (c-pointer void)))) (begin (define CompressedTexSubImage3DARB (foreign-lambda void "CompressedTexSubImage3DARB" unsigned-integer integer integer integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define CompressedTexSubImage2DARB (foreign-lambda void "CompressedTexSubImage2DARB" unsigned-integer integer integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define CompressedTexSubImage1DARB (foreign-lambda void "CompressedTexSubImage1DARB" unsigned-integer integer integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetCompressedTexImageARB (foreign-lambda void "GetCompressedTexImageARB" unsigned-integer integer (c-pointer void)))) (begin (define PointParameterfARB (foreign-lambda void "PointParameterfARB" unsigned-integer float))) (begin (define PointParameterfvARB (foreign-lambda void "PointParameterfvARB" unsigned-integer f32vector))) (begin (define WeightbvARB (foreign-lambda void "WeightbvARB" integer c-string))) (begin (define WeightsvARB (foreign-lambda void "WeightsvARB" integer s16vector))) (begin (define WeightivARB (foreign-lambda void "WeightivARB" integer s32vector))) (begin (define WeightfvARB (foreign-lambda void "WeightfvARB" integer f32vector))) (begin (define WeightdvARB (foreign-lambda void "WeightdvARB" integer f64vector))) (begin (define WeightubvARB (foreign-lambda void "WeightubvARB" integer u8vector))) (begin (define WeightusvARB (foreign-lambda void "WeightusvARB" integer u16vector))) (begin (define WeightuivARB (foreign-lambda void "WeightuivARB" integer u32vector))) (begin (define WeightPointerARB (foreign-lambda void "WeightPointerARB" integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define VertexBlendARB (foreign-lambda void "VertexBlendARB" integer))) (begin (define CurrentPaletteMatrixARB (foreign-lambda void "CurrentPaletteMatrixARB" integer))) (begin (define MatrixIndexubvARB (foreign-lambda void "MatrixIndexubvARB" integer u8vector))) (begin (define MatrixIndexusvARB (foreign-lambda void "MatrixIndexusvARB" integer u16vector))) (begin (define MatrixIndexuivARB (foreign-lambda void "MatrixIndexuivARB" integer u32vector))) (begin (define MatrixIndexPointerARB (foreign-lambda void "MatrixIndexPointerARB" integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define WindowPos2dARB (foreign-lambda void "WindowPos2dARB" double double))) (begin (define WindowPos2dvARB (foreign-lambda void "WindowPos2dvARB" f64vector))) (begin (define WindowPos2fARB (foreign-lambda void "WindowPos2fARB" float float))) (begin (define WindowPos2fvARB (foreign-lambda void "WindowPos2fvARB" f32vector))) (begin (define WindowPos2iARB (foreign-lambda void "WindowPos2iARB" integer integer))) (begin (define WindowPos2ivARB (foreign-lambda void "WindowPos2ivARB" s32vector))) (begin (define WindowPos2sARB (foreign-lambda void "WindowPos2sARB" short short))) (begin (define WindowPos2svARB (foreign-lambda void "WindowPos2svARB" s16vector))) (begin (define WindowPos3dARB (foreign-lambda void "WindowPos3dARB" double double double))) (begin (define WindowPos3dvARB (foreign-lambda void "WindowPos3dvARB" f64vector))) (begin (define WindowPos3fARB (foreign-lambda void "WindowPos3fARB" float float float))) (begin (define WindowPos3fvARB (foreign-lambda void "WindowPos3fvARB" f32vector))) (begin (define WindowPos3iARB (foreign-lambda void "WindowPos3iARB" integer integer integer))) (begin (define WindowPos3ivARB (foreign-lambda void "WindowPos3ivARB" s32vector))) (begin (define WindowPos3sARB (foreign-lambda void "WindowPos3sARB" short short short))) (begin (define WindowPos3svARB (foreign-lambda void "WindowPos3svARB" s16vector))) (begin (define VertexAttrib1dARB (foreign-lambda void "VertexAttrib1dARB" unsigned-integer double))) (begin (define VertexAttrib1dvARB (foreign-lambda void "VertexAttrib1dvARB" unsigned-integer f64vector))) (begin (define VertexAttrib1fARB (foreign-lambda void "VertexAttrib1fARB" unsigned-integer float))) (begin (define VertexAttrib1fvARB (foreign-lambda void "VertexAttrib1fvARB" unsigned-integer f32vector))) (begin (define VertexAttrib1sARB (foreign-lambda void "VertexAttrib1sARB" unsigned-integer short))) (begin (define VertexAttrib1svARB (foreign-lambda void "VertexAttrib1svARB" unsigned-integer s16vector))) (begin (define VertexAttrib2dARB (foreign-lambda void "VertexAttrib2dARB" unsigned-integer double double))) (begin (define VertexAttrib2dvARB (foreign-lambda void "VertexAttrib2dvARB" unsigned-integer f64vector))) (begin (define VertexAttrib2fARB (foreign-lambda void "VertexAttrib2fARB" unsigned-integer float float))) (begin (define VertexAttrib2fvARB (foreign-lambda void "VertexAttrib2fvARB" unsigned-integer f32vector))) (begin (define VertexAttrib2sARB (foreign-lambda void "VertexAttrib2sARB" unsigned-integer short short))) (begin (define VertexAttrib2svARB (foreign-lambda void "VertexAttrib2svARB" unsigned-integer s16vector))) (begin (define VertexAttrib3dARB (foreign-lambda void "VertexAttrib3dARB" unsigned-integer double double double))) (begin (define VertexAttrib3dvARB (foreign-lambda void "VertexAttrib3dvARB" unsigned-integer f64vector))) (begin (define VertexAttrib3fARB (foreign-lambda void "VertexAttrib3fARB" unsigned-integer float float float))) (begin (define VertexAttrib3fvARB (foreign-lambda void "VertexAttrib3fvARB" unsigned-integer f32vector))) (begin (define VertexAttrib3sARB (foreign-lambda void "VertexAttrib3sARB" unsigned-integer short short short))) (begin (define VertexAttrib3svARB (foreign-lambda void "VertexAttrib3svARB" unsigned-integer s16vector))) (begin (define VertexAttrib4NbvARB (foreign-lambda void "VertexAttrib4NbvARB" unsigned-integer c-string))) (begin (define VertexAttrib4NivARB (foreign-lambda void "VertexAttrib4NivARB" unsigned-integer s32vector))) (begin (define VertexAttrib4NsvARB (foreign-lambda void "VertexAttrib4NsvARB" unsigned-integer s16vector))) (begin (define VertexAttrib4NubARB (foreign-lambda void "VertexAttrib4NubARB" unsigned-integer unsigned-char unsigned-char unsigned-char unsigned-char))) (begin (define VertexAttrib4NubvARB (foreign-lambda void "VertexAttrib4NubvARB" unsigned-integer u8vector))) (begin (define VertexAttrib4NuivARB (foreign-lambda void "VertexAttrib4NuivARB" unsigned-integer u32vector))) (begin (define VertexAttrib4NusvARB (foreign-lambda void "VertexAttrib4NusvARB" unsigned-integer u16vector))) (begin (define VertexAttrib4bvARB (foreign-lambda void "VertexAttrib4bvARB" unsigned-integer c-string))) (begin (define VertexAttrib4dARB (foreign-lambda void "VertexAttrib4dARB" unsigned-integer double double double double))) (begin (define VertexAttrib4dvARB (foreign-lambda void "VertexAttrib4dvARB" unsigned-integer f64vector))) (begin (define VertexAttrib4fARB (foreign-lambda void "VertexAttrib4fARB" unsigned-integer float float float float))) (begin (define VertexAttrib4fvARB (foreign-lambda void "VertexAttrib4fvARB" unsigned-integer f32vector))) (begin (define VertexAttrib4ivARB (foreign-lambda void "VertexAttrib4ivARB" unsigned-integer s32vector))) (begin (define VertexAttrib4sARB (foreign-lambda void "VertexAttrib4sARB" unsigned-integer short short short short))) (begin (define VertexAttrib4svARB (foreign-lambda void "VertexAttrib4svARB" unsigned-integer s16vector))) (begin (define VertexAttrib4ubvARB (foreign-lambda void "VertexAttrib4ubvARB" unsigned-integer u8vector))) (begin (define VertexAttrib4uivARB (foreign-lambda void "VertexAttrib4uivARB" unsigned-integer u32vector))) (begin (define VertexAttrib4usvARB (foreign-lambda void "VertexAttrib4usvARB" unsigned-integer u16vector))) (begin (define VertexAttribPointerARB (foreign-lambda void "VertexAttribPointerARB" unsigned-integer integer unsigned-integer unsigned-char unsigned-integer (c-pointer void)))) (begin (define EnableVertexAttribArrayARB (foreign-lambda void "EnableVertexAttribArrayARB" unsigned-integer))) (begin (define DisableVertexAttribArrayARB (foreign-lambda void "DisableVertexAttribArrayARB" unsigned-integer))) (begin (define ProgramStringARB (foreign-lambda void "ProgramStringARB" unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define BindProgramARB (foreign-lambda void "BindProgramARB" unsigned-integer unsigned-integer))) (begin (define DeleteProgramsARB (foreign-lambda void "DeleteProgramsARB" unsigned-integer u32vector))) (begin (define GenProgramsARB (foreign-lambda void "GenProgramsARB" unsigned-integer u32vector))) (begin (define ProgramEnvParameter4dARB (foreign-lambda void "ProgramEnvParameter4dARB" unsigned-integer unsigned-integer double double double double))) (begin (define ProgramEnvParameter4dvARB (foreign-lambda void "ProgramEnvParameter4dvARB" unsigned-integer unsigned-integer f64vector))) (begin (define ProgramEnvParameter4fARB (foreign-lambda void "ProgramEnvParameter4fARB" unsigned-integer unsigned-integer float float float float))) (begin (define ProgramEnvParameter4fvARB (foreign-lambda void "ProgramEnvParameter4fvARB" unsigned-integer unsigned-integer f32vector))) (begin (define ProgramLocalParameter4dARB (foreign-lambda void "ProgramLocalParameter4dARB" unsigned-integer unsigned-integer double double double double))) (begin (define ProgramLocalParameter4dvARB (foreign-lambda void "ProgramLocalParameter4dvARB" unsigned-integer unsigned-integer f64vector))) (begin (define ProgramLocalParameter4fARB (foreign-lambda void "ProgramLocalParameter4fARB" unsigned-integer unsigned-integer float float float float))) (begin (define ProgramLocalParameter4fvARB (foreign-lambda void "ProgramLocalParameter4fvARB" unsigned-integer unsigned-integer f32vector))) (begin (define GetProgramEnvParameterdvARB (foreign-lambda void "GetProgramEnvParameterdvARB" unsigned-integer unsigned-integer f64vector))) (begin (define GetProgramEnvParameterfvARB (foreign-lambda void "GetProgramEnvParameterfvARB" unsigned-integer unsigned-integer f32vector))) (begin (define GetProgramLocalParameterdvARB (foreign-lambda void "GetProgramLocalParameterdvARB" unsigned-integer unsigned-integer f64vector))) (begin (define GetProgramLocalParameterfvARB (foreign-lambda void "GetProgramLocalParameterfvARB" unsigned-integer unsigned-integer f32vector))) (begin (define GetProgramivARB (foreign-lambda void "GetProgramivARB" unsigned-integer unsigned-integer s32vector))) (begin (define GetProgramStringARB (foreign-lambda void "GetProgramStringARB" unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetVertexAttribdvARB (foreign-lambda void "GetVertexAttribdvARB" unsigned-integer unsigned-integer f64vector))) (begin (define GetVertexAttribfvARB (foreign-lambda void "GetVertexAttribfvARB" unsigned-integer unsigned-integer f32vector))) (begin (define GetVertexAttribivARB (foreign-lambda void "GetVertexAttribivARB" unsigned-integer unsigned-integer s32vector))) (begin (define GetVertexAttribPointervARB (foreign-lambda void "GetVertexAttribPointervARB" unsigned-integer unsigned-integer (c-pointer (c-pointer void))))) (begin (define IsProgramARB (foreign-lambda unsigned-char "IsProgramARB" unsigned-integer))) (begin (define BindBufferARB (foreign-lambda void "BindBufferARB" unsigned-integer unsigned-integer))) (begin (define DeleteBuffersARB (foreign-lambda void "DeleteBuffersARB" unsigned-integer u32vector))) (begin (define GenBuffersARB (foreign-lambda void "GenBuffersARB" unsigned-integer u32vector))) (begin (define IsBufferARB (foreign-lambda unsigned-char "IsBufferARB" unsigned-integer))) (begin (define BufferDataARB (foreign-lambda void "BufferDataARB" unsigned-integer integer (c-pointer void) unsigned-integer))) (begin (define BufferSubDataARB (foreign-lambda void "BufferSubDataARB" unsigned-integer integer integer (c-pointer void)))) (begin (define GetBufferSubDataARB (foreign-lambda void "GetBufferSubDataARB" unsigned-integer integer integer (c-pointer void)))) (begin (define MapBufferARB (foreign-lambda (c-pointer void) "MapBufferARB" unsigned-integer unsigned-integer))) (begin (define UnmapBufferARB (foreign-lambda unsigned-char "UnmapBufferARB" unsigned-integer))) (begin (define GetBufferParameterivARB (foreign-lambda void "GetBufferParameterivARB" unsigned-integer unsigned-integer s32vector))) (begin (define GetBufferPointervARB (foreign-lambda void "GetBufferPointervARB" unsigned-integer unsigned-integer (c-pointer (c-pointer void))))) (begin (define GenQueriesARB (foreign-lambda void "GenQueriesARB" unsigned-integer u32vector))) (begin (define DeleteQueriesARB (foreign-lambda void "DeleteQueriesARB" unsigned-integer u32vector))) (begin (define IsQueryARB (foreign-lambda unsigned-char "IsQueryARB" unsigned-integer))) (begin (define BeginQueryARB (foreign-lambda void "BeginQueryARB" unsigned-integer unsigned-integer))) (begin (define EndQueryARB (foreign-lambda void "EndQueryARB" unsigned-integer))) (begin (define GetQueryivARB (foreign-lambda void "GetQueryivARB" unsigned-integer unsigned-integer s32vector))) (begin (define GetQueryObjectivARB (foreign-lambda void "GetQueryObjectivARB" unsigned-integer unsigned-integer s32vector))) (begin (define GetQueryObjectuivARB (foreign-lambda void "GetQueryObjectuivARB" unsigned-integer unsigned-integer u32vector))) (begin (define DeleteObjectARB (foreign-lambda void "DeleteObjectARB" unsigned-integer))) (begin (define GetHandleARB (foreign-lambda unsigned-integer "GetHandleARB" unsigned-integer))) (begin (define DetachObjectARB (foreign-lambda void "DetachObjectARB" unsigned-integer unsigned-integer))) (begin (define CreateShaderObjectARB (foreign-lambda unsigned-integer "CreateShaderObjectARB" unsigned-integer))) (begin (define ShaderSourceARB (foreign-lambda void "ShaderSourceARB" unsigned-integer unsigned-integer (c-pointer (c-pointer (const char))) s32vector))) (begin (define CompileShaderARB (foreign-lambda void "CompileShaderARB" unsigned-integer))) (begin (define CreateProgramObjectARB (foreign-lambda unsigned-integer "CreateProgramObjectARB"))) (begin (define AttachObjectARB (foreign-lambda void "AttachObjectARB" unsigned-integer unsigned-integer))) (begin (define LinkProgramARB (foreign-lambda void "LinkProgramARB" unsigned-integer))) (begin (define UseProgramObjectARB (foreign-lambda void "UseProgramObjectARB" unsigned-integer))) (begin (define ValidateProgramARB (foreign-lambda void "ValidateProgramARB" unsigned-integer))) (begin (define Uniform1fARB (foreign-lambda void "Uniform1fARB" integer float))) (begin (define Uniform2fARB (foreign-lambda void "Uniform2fARB" integer float float))) (begin (define Uniform3fARB (foreign-lambda void "Uniform3fARB" integer float float float))) (begin (define Uniform4fARB (foreign-lambda void "Uniform4fARB" integer float float float float))) (begin (define Uniform1iARB (foreign-lambda void "Uniform1iARB" integer integer))) (begin (define Uniform2iARB (foreign-lambda void "Uniform2iARB" integer integer integer))) (begin (define Uniform3iARB (foreign-lambda void "Uniform3iARB" integer integer integer integer))) (begin (define Uniform4iARB (foreign-lambda void "Uniform4iARB" integer integer integer integer integer))) (begin (define Uniform1fvARB (foreign-lambda void "Uniform1fvARB" integer unsigned-integer f32vector))) (begin (define Uniform2fvARB (foreign-lambda void "Uniform2fvARB" integer unsigned-integer f32vector))) (begin (define Uniform3fvARB (foreign-lambda void "Uniform3fvARB" integer unsigned-integer f32vector))) (begin (define Uniform4fvARB (foreign-lambda void "Uniform4fvARB" integer unsigned-integer f32vector))) (begin (define Uniform1ivARB (foreign-lambda void "Uniform1ivARB" integer unsigned-integer s32vector))) (begin (define Uniform2ivARB (foreign-lambda void "Uniform2ivARB" integer unsigned-integer s32vector))) (begin (define Uniform3ivARB (foreign-lambda void "Uniform3ivARB" integer unsigned-integer s32vector))) (begin (define Uniform4ivARB (foreign-lambda void "Uniform4ivARB" integer unsigned-integer s32vector))) (begin (define UniformMatrix2fvARB (foreign-lambda void "UniformMatrix2fvARB" integer unsigned-integer unsigned-char f32vector))) (begin (define UniformMatrix3fvARB (foreign-lambda void "UniformMatrix3fvARB" integer unsigned-integer unsigned-char f32vector))) (begin (define UniformMatrix4fvARB (foreign-lambda void "UniformMatrix4fvARB" integer unsigned-integer unsigned-char f32vector))) (begin (define GetObjectParameterfvARB (foreign-lambda void "GetObjectParameterfvARB" unsigned-integer unsigned-integer f32vector))) (begin (define GetObjectParameterivARB (foreign-lambda void "GetObjectParameterivARB" unsigned-integer unsigned-integer s32vector))) (begin (define GetInfoLogARB (foreign-lambda void "GetInfoLogARB" unsigned-integer unsigned-integer u32vector c-string))) (begin (define GetAttachedObjectsARB (foreign-lambda void "GetAttachedObjectsARB" unsigned-integer unsigned-integer u32vector u32vector))) (begin (define GetUniformLocationARB (foreign-lambda integer "GetUniformLocationARB" unsigned-integer c-string))) (begin (define GetActiveUniformARB (foreign-lambda void "GetActiveUniformARB" unsigned-integer unsigned-integer unsigned-integer u32vector s32vector u32vector c-string))) (begin (define GetUniformfvARB (foreign-lambda void "GetUniformfvARB" unsigned-integer integer f32vector))) (begin (define GetUniformivARB (foreign-lambda void "GetUniformivARB" unsigned-integer integer s32vector))) (begin (define GetShaderSourceARB (foreign-lambda void "GetShaderSourceARB" unsigned-integer unsigned-integer u32vector c-string))) (begin (define VertexAttrib1fARB (foreign-lambda void "VertexAttrib1fARB" unsigned-integer float))) (begin (define VertexAttrib1sARB (foreign-lambda void "VertexAttrib1sARB" unsigned-integer short))) (begin (define VertexAttrib1dARB (foreign-lambda void "VertexAttrib1dARB" unsigned-integer double))) (begin (define VertexAttrib2fARB (foreign-lambda void "VertexAttrib2fARB" unsigned-integer float float))) (begin (define VertexAttrib2sARB (foreign-lambda void "VertexAttrib2sARB" unsigned-integer short short))) (begin (define VertexAttrib2dARB (foreign-lambda void "VertexAttrib2dARB" unsigned-integer double double))) (begin (define VertexAttrib3fARB (foreign-lambda void "VertexAttrib3fARB" unsigned-integer float float float))) (begin (define VertexAttrib3sARB (foreign-lambda void "VertexAttrib3sARB" unsigned-integer short short short))) (begin (define VertexAttrib3dARB (foreign-lambda void "VertexAttrib3dARB" unsigned-integer double double double))) (begin (define VertexAttrib4fARB (foreign-lambda void "VertexAttrib4fARB" unsigned-integer float float float float))) (begin (define VertexAttrib4sARB (foreign-lambda void "VertexAttrib4sARB" unsigned-integer short short short short))) (begin (define VertexAttrib4dARB (foreign-lambda void "VertexAttrib4dARB" unsigned-integer double double double double))) (begin (define VertexAttrib4NubARB (foreign-lambda void "VertexAttrib4NubARB" unsigned-integer unsigned-char unsigned-char unsigned-char unsigned-char))) (begin (define VertexAttrib1fvARB (foreign-lambda void "VertexAttrib1fvARB" unsigned-integer f32vector))) (begin (define VertexAttrib1svARB (foreign-lambda void "VertexAttrib1svARB" unsigned-integer s16vector))) (begin (define VertexAttrib1dvARB (foreign-lambda void "VertexAttrib1dvARB" unsigned-integer f64vector))) (begin (define VertexAttrib2fvARB (foreign-lambda void "VertexAttrib2fvARB" unsigned-integer f32vector))) (begin (define VertexAttrib2svARB (foreign-lambda void "VertexAttrib2svARB" unsigned-integer s16vector))) (begin (define VertexAttrib2dvARB (foreign-lambda void "VertexAttrib2dvARB" unsigned-integer f64vector))) (begin (define VertexAttrib3fvARB (foreign-lambda void "VertexAttrib3fvARB" unsigned-integer f32vector))) (begin (define VertexAttrib3svARB (foreign-lambda void "VertexAttrib3svARB" unsigned-integer s16vector))) (begin (define VertexAttrib3dvARB (foreign-lambda void "VertexAttrib3dvARB" unsigned-integer f64vector))) (begin (define VertexAttrib4fvARB (foreign-lambda void "VertexAttrib4fvARB" unsigned-integer f32vector))) (begin (define VertexAttrib4svARB (foreign-lambda void "VertexAttrib4svARB" unsigned-integer s16vector))) (begin (define VertexAttrib4dvARB (foreign-lambda void "VertexAttrib4dvARB" unsigned-integer f64vector))) (begin (define VertexAttrib4ivARB (foreign-lambda void "VertexAttrib4ivARB" unsigned-integer s32vector))) (begin (define VertexAttrib4bvARB (foreign-lambda void "VertexAttrib4bvARB" unsigned-integer c-string))) (begin (define VertexAttrib4ubvARB (foreign-lambda void "VertexAttrib4ubvARB" unsigned-integer u8vector))) (begin (define VertexAttrib4usvARB (foreign-lambda void "VertexAttrib4usvARB" unsigned-integer u16vector))) (begin (define VertexAttrib4uivARB (foreign-lambda void "VertexAttrib4uivARB" unsigned-integer u32vector))) (begin (define VertexAttrib4NbvARB (foreign-lambda void "VertexAttrib4NbvARB" unsigned-integer c-string))) (begin (define VertexAttrib4NsvARB (foreign-lambda void "VertexAttrib4NsvARB" unsigned-integer s16vector))) (begin (define VertexAttrib4NivARB (foreign-lambda void "VertexAttrib4NivARB" unsigned-integer s32vector))) (begin (define VertexAttrib4NubvARB (foreign-lambda void "VertexAttrib4NubvARB" unsigned-integer u8vector))) (begin (define VertexAttrib4NusvARB (foreign-lambda void "VertexAttrib4NusvARB" unsigned-integer u16vector))) (begin (define VertexAttrib4NuivARB (foreign-lambda void "VertexAttrib4NuivARB" unsigned-integer u32vector))) (begin (define VertexAttribPointerARB (foreign-lambda void "VertexAttribPointerARB" unsigned-integer integer unsigned-integer unsigned-char unsigned-integer (c-pointer void)))) (begin (define EnableVertexAttribArrayARB (foreign-lambda void "EnableVertexAttribArrayARB" unsigned-integer))) (begin (define DisableVertexAttribArrayARB (foreign-lambda void "DisableVertexAttribArrayARB" unsigned-integer))) (begin (define BindAttribLocationARB (foreign-lambda void "BindAttribLocationARB" unsigned-integer unsigned-integer c-string))) (begin (define GetActiveAttribARB (foreign-lambda void "GetActiveAttribARB" unsigned-integer unsigned-integer unsigned-integer u32vector s32vector u32vector c-string))) (begin (define GetAttribLocationARB (foreign-lambda integer "GetAttribLocationARB" unsigned-integer c-string))) (begin (define GetVertexAttribdvARB (foreign-lambda void "GetVertexAttribdvARB" unsigned-integer unsigned-integer f64vector))) (begin (define GetVertexAttribfvARB (foreign-lambda void "GetVertexAttribfvARB" unsigned-integer unsigned-integer f32vector))) (begin (define GetVertexAttribivARB (foreign-lambda void "GetVertexAttribivARB" unsigned-integer unsigned-integer s32vector))) (begin (define GetVertexAttribPointervARB (foreign-lambda void "GetVertexAttribPointervARB" unsigned-integer unsigned-integer (c-pointer (c-pointer void))))) (begin (define DrawBuffersARB (foreign-lambda void "DrawBuffersARB" unsigned-integer u32vector))) (begin (define ClampColorARB (foreign-lambda void "ClampColorARB" unsigned-integer unsigned-integer))) (begin (define DrawArraysInstancedARB (foreign-lambda void "DrawArraysInstancedARB" unsigned-integer integer unsigned-integer unsigned-integer))) (begin (define DrawElementsInstancedARB (foreign-lambda void "DrawElementsInstancedARB" unsigned-integer unsigned-integer unsigned-integer (c-pointer void) unsigned-integer))) (begin (define IsRenderbuffer (foreign-lambda unsigned-char "IsRenderbuffer" unsigned-integer))) (begin (define BindRenderbuffer (foreign-lambda void "BindRenderbuffer" unsigned-integer unsigned-integer))) (begin (define DeleteRenderbuffers (foreign-lambda void "DeleteRenderbuffers" unsigned-integer u32vector))) (begin (define GenRenderbuffers (foreign-lambda void "GenRenderbuffers" unsigned-integer u32vector))) (begin (define RenderbufferStorage (foreign-lambda void "RenderbufferStorage" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define GetRenderbufferParameteriv (foreign-lambda void "GetRenderbufferParameteriv" unsigned-integer unsigned-integer s32vector))) (begin (define IsFramebuffer (foreign-lambda unsigned-char "IsFramebuffer" unsigned-integer))) (begin (define BindFramebuffer (foreign-lambda void "BindFramebuffer" unsigned-integer unsigned-integer))) (begin (define DeleteFramebuffers (foreign-lambda void "DeleteFramebuffers" unsigned-integer u32vector))) (begin (define GenFramebuffers (foreign-lambda void "GenFramebuffers" unsigned-integer u32vector))) (begin (define CheckFramebufferStatus (foreign-lambda unsigned-integer "CheckFramebufferStatus" unsigned-integer))) (begin (define FramebufferTexture1D (foreign-lambda void "FramebufferTexture1D" unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define FramebufferTexture2D (foreign-lambda void "FramebufferTexture2D" unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define FramebufferTexture3D (foreign-lambda void "FramebufferTexture3D" unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer integer))) (begin (define FramebufferRenderbuffer (foreign-lambda void "FramebufferRenderbuffer" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define GetFramebufferAttachmentParameteriv (foreign-lambda void "GetFramebufferAttachmentParameteriv" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GenerateMipmap (foreign-lambda void "GenerateMipmap" unsigned-integer))) (begin (define BlitFramebuffer (foreign-lambda void "BlitFramebuffer" integer integer integer integer integer integer integer integer unsigned-integer unsigned-integer))) (begin (define RenderbufferStorageMultisample (foreign-lambda void "RenderbufferStorageMultisample" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define FramebufferTextureLayer (foreign-lambda void "FramebufferTextureLayer" unsigned-integer unsigned-integer unsigned-integer integer integer))) (begin (define ProgramParameteriARB (foreign-lambda void "ProgramParameteriARB" unsigned-integer unsigned-integer integer))) (begin (define FramebufferTextureARB (foreign-lambda void "FramebufferTextureARB" unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define FramebufferTextureLayerARB (foreign-lambda void "FramebufferTextureLayerARB" unsigned-integer unsigned-integer unsigned-integer integer integer))) (begin (define FramebufferTextureFaceARB (foreign-lambda void "FramebufferTextureFaceARB" unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer))) (begin (define VertexAttribDivisor (foreign-lambda void "VertexAttribDivisor" unsigned-integer unsigned-integer))) (begin (define MapBufferRange (foreign-lambda void "MapBufferRange" unsigned-integer integer integer unsigned-integer))) (begin (define FlushMappedBufferRange (foreign-lambda void "FlushMappedBufferRange" unsigned-integer integer integer))) (begin (define TexBufferARB (foreign-lambda void "TexBufferARB" unsigned-integer unsigned-integer unsigned-integer))) (begin (define BindVertexArray (foreign-lambda void "BindVertexArray" unsigned-integer))) (begin (define DeleteVertexArrays (foreign-lambda void "DeleteVertexArrays" unsigned-integer u32vector))) (begin (define GenVertexArrays (foreign-lambda void "GenVertexArrays" unsigned-integer u32vector))) (begin (define IsVertexArray (foreign-lambda unsigned-char "IsVertexArray" unsigned-integer))) (begin (define GetUniformIndices (foreign-lambda void "GetUniformIndices" unsigned-integer unsigned-integer (c-pointer (c-pointer (const char))) u32vector))) (begin (define GetActiveUniformsiv (foreign-lambda void "GetActiveUniformsiv" unsigned-integer unsigned-integer u32vector unsigned-integer s32vector))) (begin (define GetActiveUniformName (foreign-lambda void "GetActiveUniformName" unsigned-integer unsigned-integer unsigned-integer u32vector c-string))) (begin (define GetUniformBlockIndex (foreign-lambda unsigned-integer "GetUniformBlockIndex" unsigned-integer c-string))) (begin (define GetActiveUniformBlockiv (foreign-lambda void "GetActiveUniformBlockiv" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GetActiveUniformBlockName (foreign-lambda void "GetActiveUniformBlockName" unsigned-integer unsigned-integer unsigned-integer u32vector c-string))) (begin (define UniformBlockBinding (foreign-lambda void "UniformBlockBinding" unsigned-integer unsigned-integer unsigned-integer))) (begin (define CopyBufferSubData (foreign-lambda void "CopyBufferSubData" unsigned-integer unsigned-integer integer integer integer))) (begin (define DrawElementsBaseVertex (foreign-lambda void "DrawElementsBaseVertex" unsigned-integer unsigned-integer unsigned-integer (c-pointer void) integer))) (begin (define DrawRangeElementsBaseVertex (foreign-lambda void "DrawRangeElementsBaseVertex" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void) integer))) (begin (define DrawElementsInstancedBaseVertex (foreign-lambda void "DrawElementsInstancedBaseVertex" unsigned-integer unsigned-integer unsigned-integer (c-pointer void) unsigned-integer integer))) (begin (define MultiDrawElementsBaseVertex (foreign-lambda void "MultiDrawElementsBaseVertex" unsigned-integer u32vector unsigned-integer (c-pointer (c-pointer (const void))) unsigned-integer s32vector))) (begin (define ProvokingVertex (foreign-lambda void "ProvokingVertex" unsigned-integer))) (begin (define FenceSync (foreign-lambda (c-pointer (struct "__GLsync")) "FenceSync" unsigned-integer unsigned-integer))) (begin (define IsSync (foreign-lambda unsigned-char "IsSync" (c-pointer (struct "__GLsync"))))) (begin (define DeleteSync (foreign-lambda void "DeleteSync" (c-pointer (struct "__GLsync"))))) (begin (define ClientWaitSync (foreign-lambda unsigned-integer "ClientWaitSync" (c-pointer (struct "__GLsync")) unsigned-integer unsigned-integer))) (begin (define WaitSync (foreign-lambda void "WaitSync" (c-pointer (struct "__GLsync")) unsigned-integer unsigned-integer))) (begin (define GetInteger64v (foreign-lambda void "GetInteger64v" unsigned-integer s32vector))) (begin (define GetSynciv (foreign-lambda void "GetSynciv" (c-pointer (struct "__GLsync")) unsigned-integer unsigned-integer u32vector s32vector))) (begin (define TexImage2DMultisample (foreign-lambda void "TexImage2DMultisample" unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer unsigned-char))) (begin (define TexImage3DMultisample (foreign-lambda void "TexImage3DMultisample" unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-char))) (begin (define GetMultisamplefv (foreign-lambda void "GetMultisamplefv" unsigned-integer unsigned-integer f32vector))) (begin (define SampleMaski (foreign-lambda void "SampleMaski" unsigned-integer unsigned-integer))) (begin (define BlendEquationi (foreign-lambda void "BlendEquationi" unsigned-integer unsigned-integer))) (begin (define BlendEquationSeparatei (foreign-lambda void "BlendEquationSeparatei" unsigned-integer unsigned-integer unsigned-integer))) (begin (define BlendFunci (foreign-lambda void "BlendFunci" unsigned-integer unsigned-integer unsigned-integer))) (begin (define BlendFuncSeparatei (foreign-lambda void "BlendFuncSeparatei" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define MinSampleShading (foreign-lambda void "MinSampleShading" float))) (begin (define NamedStringARB (foreign-lambda void "NamedStringARB" unsigned-integer integer c-string integer c-string))) (begin (define DeleteNamedStringARB (foreign-lambda void "DeleteNamedStringARB" integer c-string))) (begin (define CompileShaderIncludeARB (foreign-lambda void "CompileShaderIncludeARB" unsigned-integer unsigned-integer (c-pointer (c-pointer (const char))) s32vector))) (begin (define IsNamedStringARB (foreign-lambda unsigned-char "IsNamedStringARB" integer c-string))) (begin (define GetNamedStringARB (foreign-lambda void "GetNamedStringARB" integer c-string unsigned-integer s32vector c-string))) (begin (define GetNamedStringivARB (foreign-lambda void "GetNamedStringivARB" integer c-string unsigned-integer s32vector))) (begin (define BindFragDataLocationIndexed (foreign-lambda void "BindFragDataLocationIndexed" unsigned-integer unsigned-integer unsigned-integer c-string))) (begin (define GetFragDataIndex (foreign-lambda integer "GetFragDataIndex" unsigned-integer c-string))) (begin (define GenSamplers (foreign-lambda void "GenSamplers" unsigned-integer u32vector))) (begin (define DeleteSamplers (foreign-lambda void "DeleteSamplers" unsigned-integer u32vector))) (begin (define IsSampler (foreign-lambda unsigned-char "IsSampler" unsigned-integer))) (begin (define BindSampler (foreign-lambda void "BindSampler" unsigned-integer unsigned-integer))) (begin (define SamplerParameteri (foreign-lambda void "SamplerParameteri" unsigned-integer unsigned-integer integer))) (begin (define SamplerParameteriv (foreign-lambda void "SamplerParameteriv" unsigned-integer unsigned-integer s32vector))) (begin (define SamplerParameterf (foreign-lambda void "SamplerParameterf" unsigned-integer unsigned-integer float))) (begin (define SamplerParameterfv (foreign-lambda void "SamplerParameterfv" unsigned-integer unsigned-integer f32vector))) (begin (define SamplerParameterIiv (foreign-lambda void "SamplerParameterIiv" unsigned-integer unsigned-integer s32vector))) (begin (define SamplerParameterIuiv (foreign-lambda void "SamplerParameterIuiv" unsigned-integer unsigned-integer u32vector))) (begin (define GetSamplerParameteriv (foreign-lambda void "GetSamplerParameteriv" unsigned-integer unsigned-integer s32vector))) (begin (define GetSamplerParameterIiv (foreign-lambda void "GetSamplerParameterIiv" unsigned-integer unsigned-integer s32vector))) (begin (define GetSamplerParameterfv (foreign-lambda void "GetSamplerParameterfv" unsigned-integer unsigned-integer f32vector))) (begin (define GetSamplerParameterIfv (foreign-lambda void "GetSamplerParameterIfv" unsigned-integer unsigned-integer f32vector))) (begin (define QueryCounter (foreign-lambda void "QueryCounter" unsigned-integer unsigned-integer))) (begin (define GetQueryObjecti64v (foreign-lambda void "GetQueryObjecti64v" unsigned-integer unsigned-integer s32vector))) (begin (define GetQueryObjectui64v (foreign-lambda void "GetQueryObjectui64v" unsigned-integer unsigned-integer u32vector))) (begin (define VertexP2ui (foreign-lambda void "VertexP2ui" unsigned-integer unsigned-integer))) (begin (define VertexP2uiv (foreign-lambda void "VertexP2uiv" unsigned-integer u32vector))) (begin (define VertexP3ui (foreign-lambda void "VertexP3ui" unsigned-integer unsigned-integer))) (begin (define VertexP3uiv (foreign-lambda void "VertexP3uiv" unsigned-integer u32vector))) (begin (define VertexP4ui (foreign-lambda void "VertexP4ui" unsigned-integer unsigned-integer))) (begin (define VertexP4uiv (foreign-lambda void "VertexP4uiv" unsigned-integer u32vector))) (begin (define TexCoordP1ui (foreign-lambda void "TexCoordP1ui" unsigned-integer unsigned-integer))) (begin (define TexCoordP1uiv (foreign-lambda void "TexCoordP1uiv" unsigned-integer u32vector))) (begin (define TexCoordP2ui (foreign-lambda void "TexCoordP2ui" unsigned-integer unsigned-integer))) (begin (define TexCoordP2uiv (foreign-lambda void "TexCoordP2uiv" unsigned-integer u32vector))) (begin (define TexCoordP3ui (foreign-lambda void "TexCoordP3ui" unsigned-integer unsigned-integer))) (begin (define TexCoordP3uiv (foreign-lambda void "TexCoordP3uiv" unsigned-integer u32vector))) (begin (define TexCoordP4ui (foreign-lambda void "TexCoordP4ui" unsigned-integer unsigned-integer))) (begin (define TexCoordP4uiv (foreign-lambda void "TexCoordP4uiv" unsigned-integer u32vector))) (begin (define MultiTexCoordP1ui (foreign-lambda void "MultiTexCoordP1ui" unsigned-integer unsigned-integer unsigned-integer))) (begin (define MultiTexCoordP1uiv (foreign-lambda void "MultiTexCoordP1uiv" unsigned-integer unsigned-integer u32vector))) (begin (define MultiTexCoordP2ui (foreign-lambda void "MultiTexCoordP2ui" unsigned-integer unsigned-integer unsigned-integer))) (begin (define MultiTexCoordP2uiv (foreign-lambda void "MultiTexCoordP2uiv" unsigned-integer unsigned-integer u32vector))) (begin (define MultiTexCoordP3ui (foreign-lambda void "MultiTexCoordP3ui" unsigned-integer unsigned-integer unsigned-integer))) (begin (define MultiTexCoordP3uiv (foreign-lambda void "MultiTexCoordP3uiv" unsigned-integer unsigned-integer u32vector))) (begin (define MultiTexCoordP4ui (foreign-lambda void "MultiTexCoordP4ui" unsigned-integer unsigned-integer unsigned-integer))) (begin (define MultiTexCoordP4uiv (foreign-lambda void "MultiTexCoordP4uiv" unsigned-integer unsigned-integer u32vector))) (begin (define NormalP3ui (foreign-lambda void "NormalP3ui" unsigned-integer unsigned-integer))) (begin (define NormalP3uiv (foreign-lambda void "NormalP3uiv" unsigned-integer u32vector))) (begin (define ColorP3ui (foreign-lambda void "ColorP3ui" unsigned-integer unsigned-integer))) (begin (define ColorP3uiv (foreign-lambda void "ColorP3uiv" unsigned-integer u32vector))) (begin (define ColorP4ui (foreign-lambda void "ColorP4ui" unsigned-integer unsigned-integer))) (begin (define ColorP4uiv (foreign-lambda void "ColorP4uiv" unsigned-integer u32vector))) (begin (define SecondaryColorP3ui (foreign-lambda void "SecondaryColorP3ui" unsigned-integer unsigned-integer))) (begin (define SecondaryColorP3uiv (foreign-lambda void "SecondaryColorP3uiv" unsigned-integer u32vector))) (begin (define VertexAttribP1ui (foreign-lambda void "VertexAttribP1ui" unsigned-integer unsigned-integer unsigned-char unsigned-integer))) (begin (define VertexAttribP1uiv (foreign-lambda void "VertexAttribP1uiv" unsigned-integer unsigned-integer unsigned-char u32vector))) (begin (define VertexAttribP2ui (foreign-lambda void "VertexAttribP2ui" unsigned-integer unsigned-integer unsigned-char unsigned-integer))) (begin (define VertexAttribP2uiv (foreign-lambda void "VertexAttribP2uiv" unsigned-integer unsigned-integer unsigned-char u32vector))) (begin (define VertexAttribP3ui (foreign-lambda void "VertexAttribP3ui" unsigned-integer unsigned-integer unsigned-char unsigned-integer))) (begin (define VertexAttribP3uiv (foreign-lambda void "VertexAttribP3uiv" unsigned-integer unsigned-integer unsigned-char u32vector))) (begin (define VertexAttribP4ui (foreign-lambda void "VertexAttribP4ui" unsigned-integer unsigned-integer unsigned-char unsigned-integer))) (begin (define VertexAttribP4uiv (foreign-lambda void "VertexAttribP4uiv" unsigned-integer unsigned-integer unsigned-char u32vector))) (begin (define DrawArraysIndirect (foreign-lambda void "DrawArraysIndirect" unsigned-integer (c-pointer void)))) (begin (define DrawElementsIndirect (foreign-lambda void "DrawElementsIndirect" unsigned-integer unsigned-integer (c-pointer void)))) (begin (define Uniform1d (foreign-lambda void "Uniform1d" integer double))) (begin (define Uniform2d (foreign-lambda void "Uniform2d" integer double double))) (begin (define Uniform3d (foreign-lambda void "Uniform3d" integer double double double))) (begin (define Uniform4d (foreign-lambda void "Uniform4d" integer double double double double))) (begin (define Uniform1dv (foreign-lambda void "Uniform1dv" integer unsigned-integer f64vector))) (begin (define Uniform2dv (foreign-lambda void "Uniform2dv" integer unsigned-integer f64vector))) (begin (define Uniform3dv (foreign-lambda void "Uniform3dv" integer unsigned-integer f64vector))) (begin (define Uniform4dv (foreign-lambda void "Uniform4dv" integer unsigned-integer f64vector))) (begin (define UniformMatrix2dv (foreign-lambda void "UniformMatrix2dv" integer unsigned-integer unsigned-char f64vector))) (begin (define UniformMatrix3dv (foreign-lambda void "UniformMatrix3dv" integer unsigned-integer unsigned-char f64vector))) (begin (define UniformMatrix4dv (foreign-lambda void "UniformMatrix4dv" integer unsigned-integer unsigned-char f64vector))) (begin (define UniformMatrix2x3dv (foreign-lambda void "UniformMatrix2x3dv" integer unsigned-integer unsigned-char f64vector))) (begin (define UniformMatrix2x4dv (foreign-lambda void "UniformMatrix2x4dv" integer unsigned-integer unsigned-char f64vector))) (begin (define UniformMatrix3x2dv (foreign-lambda void "UniformMatrix3x2dv" integer unsigned-integer unsigned-char f64vector))) (begin (define UniformMatrix3x4dv (foreign-lambda void "UniformMatrix3x4dv" integer unsigned-integer unsigned-char f64vector))) (begin (define UniformMatrix4x2dv (foreign-lambda void "UniformMatrix4x2dv" integer unsigned-integer unsigned-char f64vector))) (begin (define UniformMatrix4x3dv (foreign-lambda void "UniformMatrix4x3dv" integer unsigned-integer unsigned-char f64vector))) (begin (define GetUniformdv (foreign-lambda void "GetUniformdv" unsigned-integer integer f64vector))) (begin (define ProgramUniform1dEXT (foreign-lambda void "ProgramUniform1dEXT" unsigned-integer integer double))) (begin (define ProgramUniform2dEXT (foreign-lambda void "ProgramUniform2dEXT" unsigned-integer integer double double))) (begin (define ProgramUniform3dEXT (foreign-lambda void "ProgramUniform3dEXT" unsigned-integer integer double double double))) (begin (define ProgramUniform4dEXT (foreign-lambda void "ProgramUniform4dEXT" unsigned-integer integer double double double double))) (begin (define ProgramUniform1dvEXT (foreign-lambda void "ProgramUniform1dvEXT" unsigned-integer integer unsigned-integer f64vector))) (begin (define ProgramUniform2dvEXT (foreign-lambda void "ProgramUniform2dvEXT" unsigned-integer integer unsigned-integer f64vector))) (begin (define ProgramUniform3dvEXT (foreign-lambda void "ProgramUniform3dvEXT" unsigned-integer integer unsigned-integer f64vector))) (begin (define ProgramUniform4dvEXT (foreign-lambda void "ProgramUniform4dvEXT" unsigned-integer integer unsigned-integer f64vector))) (begin (define ProgramUniformMatrix2dvEXT (foreign-lambda void "ProgramUniformMatrix2dvEXT" unsigned-integer integer unsigned-integer unsigned-char f64vector))) (begin (define ProgramUniformMatrix3dvEXT (foreign-lambda void "ProgramUniformMatrix3dvEXT" unsigned-integer integer unsigned-integer unsigned-char f64vector))) (begin (define ProgramUniformMatrix4dvEXT (foreign-lambda void "ProgramUniformMatrix4dvEXT" unsigned-integer integer unsigned-integer unsigned-char f64vector))) (begin (define ProgramUniformMatrix2x3dvEXT (foreign-lambda void "ProgramUniformMatrix2x3dvEXT" unsigned-integer integer unsigned-integer unsigned-char f64vector))) (begin (define ProgramUniformMatrix2x4dvEXT (foreign-lambda void "ProgramUniformMatrix2x4dvEXT" unsigned-integer integer unsigned-integer unsigned-char f64vector))) (begin (define ProgramUniformMatrix3x2dvEXT (foreign-lambda void "ProgramUniformMatrix3x2dvEXT" unsigned-integer integer unsigned-integer unsigned-char f64vector))) (begin (define ProgramUniformMatrix3x4dvEXT (foreign-lambda void "ProgramUniformMatrix3x4dvEXT" unsigned-integer integer unsigned-integer unsigned-char f64vector))) (begin (define ProgramUniformMatrix4x2dvEXT (foreign-lambda void "ProgramUniformMatrix4x2dvEXT" unsigned-integer integer unsigned-integer unsigned-char f64vector))) (begin (define ProgramUniformMatrix4x3dvEXT (foreign-lambda void "ProgramUniformMatrix4x3dvEXT" unsigned-integer integer unsigned-integer unsigned-char f64vector))) (begin (define GetSubroutineUniformLocation (foreign-lambda integer "GetSubroutineUniformLocation" unsigned-integer unsigned-integer c-string))) (begin (define GetSubroutineIndex (foreign-lambda unsigned-integer "GetSubroutineIndex" unsigned-integer unsigned-integer c-string))) (begin (define GetActiveSubroutineUniformiv (foreign-lambda void "GetActiveSubroutineUniformiv" unsigned-integer unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GetActiveSubroutineUniformName (foreign-lambda void "GetActiveSubroutineUniformName" unsigned-integer unsigned-integer unsigned-integer unsigned-integer u32vector c-string))) (begin (define GetActiveSubroutineName (foreign-lambda void "GetActiveSubroutineName" unsigned-integer unsigned-integer unsigned-integer unsigned-integer u32vector c-string))) (begin (define UniformSubroutinesuiv (foreign-lambda void "UniformSubroutinesuiv" unsigned-integer unsigned-integer u32vector))) (begin (define GetUniformSubroutineuiv (foreign-lambda void "GetUniformSubroutineuiv" unsigned-integer integer u32vector))) (begin (define GetProgramStageiv (foreign-lambda void "GetProgramStageiv" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define PatchParameteri (foreign-lambda void "PatchParameteri" unsigned-integer integer))) (begin (define PatchParameterfv (foreign-lambda void "PatchParameterfv" unsigned-integer f32vector))) (begin (define BindTransformFeedback (foreign-lambda void "BindTransformFeedback" unsigned-integer unsigned-integer))) (begin (define DeleteTransformFeedbacks (foreign-lambda void "DeleteTransformFeedbacks" unsigned-integer u32vector))) (begin (define GenTransformFeedbacks (foreign-lambda void "GenTransformFeedbacks" unsigned-integer u32vector))) (begin (define IsTransformFeedback (foreign-lambda unsigned-char "IsTransformFeedback" unsigned-integer))) (begin (define PauseTransformFeedback (foreign-lambda void "PauseTransformFeedback"))) (begin (define ResumeTransformFeedback (foreign-lambda void "ResumeTransformFeedback"))) (begin (define DrawTransformFeedback (foreign-lambda void "DrawTransformFeedback" unsigned-integer unsigned-integer))) (begin (define DrawTransformFeedbackStream (foreign-lambda void "DrawTransformFeedbackStream" unsigned-integer unsigned-integer unsigned-integer))) (begin (define BeginQueryIndexed (foreign-lambda void "BeginQueryIndexed" unsigned-integer unsigned-integer unsigned-integer))) (begin (define EndQueryIndexed (foreign-lambda void "EndQueryIndexed" unsigned-integer unsigned-integer))) (begin (define GetQueryIndexediv (foreign-lambda void "GetQueryIndexediv" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define BlendColorEXT (foreign-lambda void "BlendColorEXT" float float float float))) (begin (define PolygonOffsetEXT (foreign-lambda void "PolygonOffsetEXT" float float))) (begin (define TexImage3DEXT (foreign-lambda void "TexImage3DEXT" unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define TexSubImage3DEXT (foreign-lambda void "TexSubImage3DEXT" unsigned-integer integer integer integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetTexFilterFuncSGIS (foreign-lambda void "GetTexFilterFuncSGIS" unsigned-integer unsigned-integer f32vector))) (begin (define TexFilterFuncSGIS (foreign-lambda void "TexFilterFuncSGIS" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define TexSubImage1DEXT (foreign-lambda void "TexSubImage1DEXT" unsigned-integer integer integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define TexSubImage2DEXT (foreign-lambda void "TexSubImage2DEXT" unsigned-integer integer integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define CopyTexImage1DEXT (foreign-lambda void "CopyTexImage1DEXT" unsigned-integer integer unsigned-integer integer integer unsigned-integer integer))) (begin (define CopyTexImage2DEXT (foreign-lambda void "CopyTexImage2DEXT" unsigned-integer integer unsigned-integer integer integer unsigned-integer unsigned-integer integer))) (begin (define CopyTexSubImage1DEXT (foreign-lambda void "CopyTexSubImage1DEXT" unsigned-integer integer integer integer integer unsigned-integer))) (begin (define CopyTexSubImage2DEXT (foreign-lambda void "CopyTexSubImage2DEXT" unsigned-integer integer integer integer integer integer unsigned-integer unsigned-integer))) (begin (define CopyTexSubImage3DEXT (foreign-lambda void "CopyTexSubImage3DEXT" unsigned-integer integer integer integer integer integer integer unsigned-integer unsigned-integer))) (begin (define GetHistogramEXT (foreign-lambda void "GetHistogramEXT" unsigned-integer unsigned-char unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetHistogramParameterfvEXT (foreign-lambda void "GetHistogramParameterfvEXT" unsigned-integer unsigned-integer f32vector))) (begin (define GetHistogramParameterivEXT (foreign-lambda void "GetHistogramParameterivEXT" unsigned-integer unsigned-integer s32vector))) (begin (define GetMinmaxEXT (foreign-lambda void "GetMinmaxEXT" unsigned-integer unsigned-char unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetMinmaxParameterfvEXT (foreign-lambda void "GetMinmaxParameterfvEXT" unsigned-integer unsigned-integer f32vector))) (begin (define GetMinmaxParameterivEXT (foreign-lambda void "GetMinmaxParameterivEXT" unsigned-integer unsigned-integer s32vector))) (begin (define HistogramEXT (foreign-lambda void "HistogramEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-char))) (begin (define MinmaxEXT (foreign-lambda void "MinmaxEXT" unsigned-integer unsigned-integer unsigned-char))) (begin (define ResetHistogramEXT (foreign-lambda void "ResetHistogramEXT" unsigned-integer))) (begin (define ResetMinmaxEXT (foreign-lambda void "ResetMinmaxEXT" unsigned-integer))) (begin (define ConvolutionFilter1DEXT (foreign-lambda void "ConvolutionFilter1DEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define ConvolutionFilter2DEXT (foreign-lambda void "ConvolutionFilter2DEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define ConvolutionParameterfEXT (foreign-lambda void "ConvolutionParameterfEXT" unsigned-integer unsigned-integer float))) (begin (define ConvolutionParameterfvEXT (foreign-lambda void "ConvolutionParameterfvEXT" unsigned-integer unsigned-integer f32vector))) (begin (define ConvolutionParameteriEXT (foreign-lambda void "ConvolutionParameteriEXT" unsigned-integer unsigned-integer integer))) (begin (define ConvolutionParameterivEXT (foreign-lambda void "ConvolutionParameterivEXT" unsigned-integer unsigned-integer s32vector))) (begin (define CopyConvolutionFilter1DEXT (foreign-lambda void "CopyConvolutionFilter1DEXT" unsigned-integer unsigned-integer integer integer unsigned-integer))) (begin (define CopyConvolutionFilter2DEXT (foreign-lambda void "CopyConvolutionFilter2DEXT" unsigned-integer unsigned-integer integer integer unsigned-integer unsigned-integer))) (begin (define GetConvolutionFilterEXT (foreign-lambda void "GetConvolutionFilterEXT" unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetConvolutionParameterfvEXT (foreign-lambda void "GetConvolutionParameterfvEXT" unsigned-integer unsigned-integer f32vector))) (begin (define GetConvolutionParameterivEXT (foreign-lambda void "GetConvolutionParameterivEXT" unsigned-integer unsigned-integer s32vector))) (begin (define GetSeparableFilterEXT (foreign-lambda void "GetSeparableFilterEXT" unsigned-integer unsigned-integer unsigned-integer (c-pointer void) (c-pointer void) (c-pointer void)))) (begin (define SeparableFilter2DEXT (foreign-lambda void "SeparableFilter2DEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void) (c-pointer void)))) (begin (define ColorTableSGI (foreign-lambda void "ColorTableSGI" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define ColorTableParameterfvSGI (foreign-lambda void "ColorTableParameterfvSGI" unsigned-integer unsigned-integer f32vector))) (begin (define ColorTableParameterivSGI (foreign-lambda void "ColorTableParameterivSGI" unsigned-integer unsigned-integer s32vector))) (begin (define CopyColorTableSGI (foreign-lambda void "CopyColorTableSGI" unsigned-integer unsigned-integer integer integer unsigned-integer))) (begin (define GetColorTableSGI (foreign-lambda void "GetColorTableSGI" unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetColorTableParameterfvSGI (foreign-lambda void "GetColorTableParameterfvSGI" unsigned-integer unsigned-integer f32vector))) (begin (define GetColorTableParameterivSGI (foreign-lambda void "GetColorTableParameterivSGI" unsigned-integer unsigned-integer s32vector))) (begin (define PixelTexGenSGIX (foreign-lambda void "PixelTexGenSGIX" unsigned-integer))) (begin (define PixelTexGenParameteriSGIS (foreign-lambda void "PixelTexGenParameteriSGIS" unsigned-integer integer))) (begin (define PixelTexGenParameterivSGIS (foreign-lambda void "PixelTexGenParameterivSGIS" unsigned-integer s32vector))) (begin (define PixelTexGenParameterfSGIS (foreign-lambda void "PixelTexGenParameterfSGIS" unsigned-integer float))) (begin (define PixelTexGenParameterfvSGIS (foreign-lambda void "PixelTexGenParameterfvSGIS" unsigned-integer f32vector))) (begin (define GetPixelTexGenParameterivSGIS (foreign-lambda void "GetPixelTexGenParameterivSGIS" unsigned-integer s32vector))) (begin (define GetPixelTexGenParameterfvSGIS (foreign-lambda void "GetPixelTexGenParameterfvSGIS" unsigned-integer f32vector))) (begin (define TexImage4DSGIS (foreign-lambda void "TexImage4DSGIS" unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define TexSubImage4DSGIS (foreign-lambda void "TexSubImage4DSGIS" unsigned-integer integer integer integer integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define AreTexturesResidentEXT (foreign-lambda unsigned-char "AreTexturesResidentEXT" unsigned-integer u32vector u8vector))) (begin (define BindTextureEXT (foreign-lambda void "BindTextureEXT" unsigned-integer unsigned-integer))) (begin (define DeleteTexturesEXT (foreign-lambda void "DeleteTexturesEXT" unsigned-integer u32vector))) (begin (define GenTexturesEXT (foreign-lambda void "GenTexturesEXT" unsigned-integer u32vector))) (begin (define IsTextureEXT (foreign-lambda unsigned-char "IsTextureEXT" unsigned-integer))) (begin (define PrioritizeTexturesEXT (foreign-lambda void "PrioritizeTexturesEXT" unsigned-integer u32vector f32vector))) (begin (define DetailTexFuncSGIS (foreign-lambda void "DetailTexFuncSGIS" unsigned-integer unsigned-integer f32vector))) (begin (define GetDetailTexFuncSGIS (foreign-lambda void "GetDetailTexFuncSGIS" unsigned-integer f32vector))) (begin (define SharpenTexFuncSGIS (foreign-lambda void "SharpenTexFuncSGIS" unsigned-integer unsigned-integer f32vector))) (begin (define GetSharpenTexFuncSGIS (foreign-lambda void "GetSharpenTexFuncSGIS" unsigned-integer f32vector))) (begin (define SampleMaskSGIS (foreign-lambda void "SampleMaskSGIS" float unsigned-char))) (begin (define SamplePatternSGIS (foreign-lambda void "SamplePatternSGIS" unsigned-integer))) (begin (define ArrayElementEXT (foreign-lambda void "ArrayElementEXT" integer))) (begin (define ColorPointerEXT (foreign-lambda void "ColorPointerEXT" integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define DrawArraysEXT (foreign-lambda void "DrawArraysEXT" unsigned-integer integer unsigned-integer))) (begin (define EdgeFlagPointerEXT (foreign-lambda void "EdgeFlagPointerEXT" unsigned-integer unsigned-integer u8vector))) (begin (define GetPointervEXT (foreign-lambda void "GetPointervEXT" unsigned-integer (c-pointer (c-pointer void))))) (begin (define IndexPointerEXT (foreign-lambda void "IndexPointerEXT" unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define NormalPointerEXT (foreign-lambda void "NormalPointerEXT" unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define TexCoordPointerEXT (foreign-lambda void "TexCoordPointerEXT" integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define VertexPointerEXT (foreign-lambda void "VertexPointerEXT" integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define BlendEquationEXT (foreign-lambda void "BlendEquationEXT" unsigned-integer))) (begin (define SpriteParameterfSGIX (foreign-lambda void "SpriteParameterfSGIX" unsigned-integer float))) (begin (define SpriteParameterfvSGIX (foreign-lambda void "SpriteParameterfvSGIX" unsigned-integer f32vector))) (begin (define SpriteParameteriSGIX (foreign-lambda void "SpriteParameteriSGIX" unsigned-integer integer))) (begin (define SpriteParameterivSGIX (foreign-lambda void "SpriteParameterivSGIX" unsigned-integer s32vector))) (begin (define PointParameterfEXT (foreign-lambda void "PointParameterfEXT" unsigned-integer float))) (begin (define PointParameterfvEXT (foreign-lambda void "PointParameterfvEXT" unsigned-integer f32vector))) (begin (define PointParameterfSGIS (foreign-lambda void "PointParameterfSGIS" unsigned-integer float))) (begin (define PointParameterfvSGIS (foreign-lambda void "PointParameterfvSGIS" unsigned-integer f32vector))) (begin (define GetInstrumentsSGIX (foreign-lambda integer "GetInstrumentsSGIX"))) (begin (define InstrumentsBufferSGIX (foreign-lambda void "InstrumentsBufferSGIX" unsigned-integer s32vector))) (begin (define PollInstrumentsSGIX (foreign-lambda integer "PollInstrumentsSGIX" s32vector))) (begin (define ReadInstrumentsSGIX (foreign-lambda void "ReadInstrumentsSGIX" integer))) (begin (define StartInstrumentsSGIX (foreign-lambda void "StartInstrumentsSGIX"))) (begin (define StopInstrumentsSGIX (foreign-lambda void "StopInstrumentsSGIX" integer))) (begin (define FrameZoomSGIX (foreign-lambda void "FrameZoomSGIX" integer))) (begin (define TagSampleBufferSGIX (foreign-lambda void "TagSampleBufferSGIX"))) (begin (define DeformationMap3dSGIX (foreign-lambda void "DeformationMap3dSGIX" unsigned-integer double double integer integer double double integer integer double double integer integer f64vector))) (begin (define DeformationMap3fSGIX (foreign-lambda void "DeformationMap3fSGIX" unsigned-integer float float integer integer float float integer integer float float integer integer f32vector))) (begin (define DeformSGIX (foreign-lambda void "DeformSGIX" unsigned-integer))) (begin (define LoadIdentityDeformationMapSGIX (foreign-lambda void "LoadIdentityDeformationMapSGIX" unsigned-integer))) (begin (define ReferencePlaneSGIX (foreign-lambda void "ReferencePlaneSGIX" f64vector))) (begin (define FlushRasterSGIX (foreign-lambda void "FlushRasterSGIX"))) (begin (define FogFuncSGIS (foreign-lambda void "FogFuncSGIS" unsigned-integer f32vector))) (begin (define GetFogFuncSGIS (foreign-lambda void "GetFogFuncSGIS" f32vector))) (begin (define ImageTransformParameteriHP (foreign-lambda void "ImageTransformParameteriHP" unsigned-integer unsigned-integer integer))) (begin (define ImageTransformParameterfHP (foreign-lambda void "ImageTransformParameterfHP" unsigned-integer unsigned-integer float))) (begin (define ImageTransformParameterivHP (foreign-lambda void "ImageTransformParameterivHP" unsigned-integer unsigned-integer s32vector))) (begin (define ImageTransformParameterfvHP (foreign-lambda void "ImageTransformParameterfvHP" unsigned-integer unsigned-integer f32vector))) (begin (define GetImageTransformParameterivHP (foreign-lambda void "GetImageTransformParameterivHP" unsigned-integer unsigned-integer s32vector))) (begin (define GetImageTransformParameterfvHP (foreign-lambda void "GetImageTransformParameterfvHP" unsigned-integer unsigned-integer f32vector))) (begin (define ColorSubTableEXT (foreign-lambda void "ColorSubTableEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define CopyColorSubTableEXT (foreign-lambda void "CopyColorSubTableEXT" unsigned-integer unsigned-integer integer integer unsigned-integer))) (begin (define HintPGI (foreign-lambda void "HintPGI" unsigned-integer integer))) (begin (define ColorTableEXT (foreign-lambda void "ColorTableEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetColorTableEXT (foreign-lambda void "GetColorTableEXT" unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetColorTableParameterivEXT (foreign-lambda void "GetColorTableParameterivEXT" unsigned-integer unsigned-integer s32vector))) (begin (define GetColorTableParameterfvEXT (foreign-lambda void "GetColorTableParameterfvEXT" unsigned-integer unsigned-integer f32vector))) (begin (define GetListParameterfvSGIX (foreign-lambda void "GetListParameterfvSGIX" unsigned-integer unsigned-integer f32vector))) (begin (define GetListParameterivSGIX (foreign-lambda void "GetListParameterivSGIX" unsigned-integer unsigned-integer s32vector))) (begin (define ListParameterfSGIX (foreign-lambda void "ListParameterfSGIX" unsigned-integer unsigned-integer float))) (begin (define ListParameterfvSGIX (foreign-lambda void "ListParameterfvSGIX" unsigned-integer unsigned-integer f32vector))) (begin (define ListParameteriSGIX (foreign-lambda void "ListParameteriSGIX" unsigned-integer unsigned-integer integer))) (begin (define ListParameterivSGIX (foreign-lambda void "ListParameterivSGIX" unsigned-integer unsigned-integer s32vector))) (begin (define IndexMaterialEXT (foreign-lambda void "IndexMaterialEXT" unsigned-integer unsigned-integer))) (begin (define IndexFuncEXT (foreign-lambda void "IndexFuncEXT" unsigned-integer float))) (begin (define LockArraysEXT (foreign-lambda void "LockArraysEXT" integer unsigned-integer))) (begin (define UnlockArraysEXT (foreign-lambda void "UnlockArraysEXT"))) (begin (define CullParameterdvEXT (foreign-lambda void "CullParameterdvEXT" unsigned-integer f64vector))) (begin (define CullParameterfvEXT (foreign-lambda void "CullParameterfvEXT" unsigned-integer f32vector))) (begin (define FragmentColorMaterialSGIX (foreign-lambda void "FragmentColorMaterialSGIX" unsigned-integer unsigned-integer))) (begin (define FragmentLightfSGIX (foreign-lambda void "FragmentLightfSGIX" unsigned-integer unsigned-integer float))) (begin (define FragmentLightfvSGIX (foreign-lambda void "FragmentLightfvSGIX" unsigned-integer unsigned-integer f32vector))) (begin (define FragmentLightiSGIX (foreign-lambda void "FragmentLightiSGIX" unsigned-integer unsigned-integer integer))) (begin (define FragmentLightivSGIX (foreign-lambda void "FragmentLightivSGIX" unsigned-integer unsigned-integer s32vector))) (begin (define FragmentLightModelfSGIX (foreign-lambda void "FragmentLightModelfSGIX" unsigned-integer float))) (begin (define FragmentLightModelfvSGIX (foreign-lambda void "FragmentLightModelfvSGIX" unsigned-integer f32vector))) (begin (define FragmentLightModeliSGIX (foreign-lambda void "FragmentLightModeliSGIX" unsigned-integer integer))) (begin (define FragmentLightModelivSGIX (foreign-lambda void "FragmentLightModelivSGIX" unsigned-integer s32vector))) (begin (define FragmentMaterialfSGIX (foreign-lambda void "FragmentMaterialfSGIX" unsigned-integer unsigned-integer float))) (begin (define FragmentMaterialfvSGIX (foreign-lambda void "FragmentMaterialfvSGIX" unsigned-integer unsigned-integer f32vector))) (begin (define FragmentMaterialiSGIX (foreign-lambda void "FragmentMaterialiSGIX" unsigned-integer unsigned-integer integer))) (begin (define FragmentMaterialivSGIX (foreign-lambda void "FragmentMaterialivSGIX" unsigned-integer unsigned-integer s32vector))) (begin (define GetFragmentLightfvSGIX (foreign-lambda void "GetFragmentLightfvSGIX" unsigned-integer unsigned-integer f32vector))) (begin (define GetFragmentLightivSGIX (foreign-lambda void "GetFragmentLightivSGIX" unsigned-integer unsigned-integer s32vector))) (begin (define GetFragmentMaterialfvSGIX (foreign-lambda void "GetFragmentMaterialfvSGIX" unsigned-integer unsigned-integer f32vector))) (begin (define GetFragmentMaterialivSGIX (foreign-lambda void "GetFragmentMaterialivSGIX" unsigned-integer unsigned-integer s32vector))) (begin (define LightEnviSGIX (foreign-lambda void "LightEnviSGIX" unsigned-integer integer))) (begin (define DrawRangeElementsEXT (foreign-lambda void "DrawRangeElementsEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define ApplyTextureEXT (foreign-lambda void "ApplyTextureEXT" unsigned-integer))) (begin (define TextureLightEXT (foreign-lambda void "TextureLightEXT" unsigned-integer))) (begin (define TextureMaterialEXT (foreign-lambda void "TextureMaterialEXT" unsigned-integer unsigned-integer))) (begin (define AsyncMarkerSGIX (foreign-lambda void "AsyncMarkerSGIX" unsigned-integer))) (begin (define FinishAsyncSGIX (foreign-lambda integer "FinishAsyncSGIX" u32vector))) (begin (define PollAsyncSGIX (foreign-lambda integer "PollAsyncSGIX" u32vector))) (begin (define GenAsyncMarkersSGIX (foreign-lambda unsigned-integer "GenAsyncMarkersSGIX" unsigned-integer))) (begin (define DeleteAsyncMarkersSGIX (foreign-lambda void "DeleteAsyncMarkersSGIX" unsigned-integer unsigned-integer))) (begin (define IsAsyncMarkerSGIX (foreign-lambda unsigned-char "IsAsyncMarkerSGIX" unsigned-integer))) (begin (define VertexPointervINTEL (foreign-lambda void "VertexPointervINTEL" integer unsigned-integer (c-pointer (c-pointer (const void)))))) (begin (define NormalPointervINTEL (foreign-lambda void "NormalPointervINTEL" unsigned-integer (c-pointer (c-pointer (const void)))))) (begin (define ColorPointervINTEL (foreign-lambda void "ColorPointervINTEL" integer unsigned-integer (c-pointer (c-pointer (const void)))))) (begin (define TexCoordPointervINTEL (foreign-lambda void "TexCoordPointervINTEL" integer unsigned-integer (c-pointer (c-pointer (const void)))))) (begin (define PixelTransformParameteriEXT (foreign-lambda void "PixelTransformParameteriEXT" unsigned-integer unsigned-integer integer))) (begin (define PixelTransformParameterfEXT (foreign-lambda void "PixelTransformParameterfEXT" unsigned-integer unsigned-integer float))) (begin (define PixelTransformParameterivEXT (foreign-lambda void "PixelTransformParameterivEXT" unsigned-integer unsigned-integer s32vector))) (begin (define PixelTransformParameterfvEXT (foreign-lambda void "PixelTransformParameterfvEXT" unsigned-integer unsigned-integer f32vector))) (begin (define SecondaryColor3bEXT (foreign-lambda void "SecondaryColor3bEXT" char char char))) (begin (define SecondaryColor3bvEXT (foreign-lambda void "SecondaryColor3bvEXT" c-string))) (begin (define SecondaryColor3dEXT (foreign-lambda void "SecondaryColor3dEXT" double double double))) (begin (define SecondaryColor3dvEXT (foreign-lambda void "SecondaryColor3dvEXT" f64vector))) (begin (define SecondaryColor3fEXT (foreign-lambda void "SecondaryColor3fEXT" float float float))) (begin (define SecondaryColor3fvEXT (foreign-lambda void "SecondaryColor3fvEXT" f32vector))) (begin (define SecondaryColor3iEXT (foreign-lambda void "SecondaryColor3iEXT" integer integer integer))) (begin (define SecondaryColor3ivEXT (foreign-lambda void "SecondaryColor3ivEXT" s32vector))) (begin (define SecondaryColor3sEXT (foreign-lambda void "SecondaryColor3sEXT" short short short))) (begin (define SecondaryColor3svEXT (foreign-lambda void "SecondaryColor3svEXT" s16vector))) (begin (define SecondaryColor3ubEXT (foreign-lambda void "SecondaryColor3ubEXT" unsigned-char unsigned-char unsigned-char))) (begin (define SecondaryColor3ubvEXT (foreign-lambda void "SecondaryColor3ubvEXT" u8vector))) (begin (define SecondaryColor3uiEXT (foreign-lambda void "SecondaryColor3uiEXT" unsigned-integer unsigned-integer unsigned-integer))) (begin (define SecondaryColor3uivEXT (foreign-lambda void "SecondaryColor3uivEXT" u32vector))) (begin (define SecondaryColor3usEXT (foreign-lambda void "SecondaryColor3usEXT" unsigned-short unsigned-short unsigned-short))) (begin (define SecondaryColor3usvEXT (foreign-lambda void "SecondaryColor3usvEXT" u16vector))) (begin (define SecondaryColorPointerEXT (foreign-lambda void "SecondaryColorPointerEXT" integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define TextureNormalEXT (foreign-lambda void "TextureNormalEXT" unsigned-integer))) (begin (define MultiDrawArraysEXT (foreign-lambda void "MultiDrawArraysEXT" unsigned-integer s32vector u32vector unsigned-integer))) (begin (define MultiDrawElementsEXT (foreign-lambda void "MultiDrawElementsEXT" unsigned-integer u32vector unsigned-integer (c-pointer (c-pointer (const void))) unsigned-integer))) (begin (define FogCoordfEXT (foreign-lambda void "FogCoordfEXT" float))) (begin (define FogCoordfvEXT (foreign-lambda void "FogCoordfvEXT" f32vector))) (begin (define FogCoorddEXT (foreign-lambda void "FogCoorddEXT" double))) (begin (define FogCoorddvEXT (foreign-lambda void "FogCoorddvEXT" f64vector))) (begin (define FogCoordPointerEXT (foreign-lambda void "FogCoordPointerEXT" unsigned-integer unsigned-integer (c-pointer void)))) (begin (define Tangent3bEXT (foreign-lambda void "Tangent3bEXT" char char char))) (begin (define Tangent3bvEXT (foreign-lambda void "Tangent3bvEXT" c-string))) (begin (define Tangent3dEXT (foreign-lambda void "Tangent3dEXT" double double double))) (begin (define Tangent3dvEXT (foreign-lambda void "Tangent3dvEXT" f64vector))) (begin (define Tangent3fEXT (foreign-lambda void "Tangent3fEXT" float float float))) (begin (define Tangent3fvEXT (foreign-lambda void "Tangent3fvEXT" f32vector))) (begin (define Tangent3iEXT (foreign-lambda void "Tangent3iEXT" integer integer integer))) (begin (define Tangent3ivEXT (foreign-lambda void "Tangent3ivEXT" s32vector))) (begin (define Tangent3sEXT (foreign-lambda void "Tangent3sEXT" short short short))) (begin (define Tangent3svEXT (foreign-lambda void "Tangent3svEXT" s16vector))) (begin (define Binormal3bEXT (foreign-lambda void "Binormal3bEXT" char char char))) (begin (define Binormal3bvEXT (foreign-lambda void "Binormal3bvEXT" c-string))) (begin (define Binormal3dEXT (foreign-lambda void "Binormal3dEXT" double double double))) (begin (define Binormal3dvEXT (foreign-lambda void "Binormal3dvEXT" f64vector))) (begin (define Binormal3fEXT (foreign-lambda void "Binormal3fEXT" float float float))) (begin (define Binormal3fvEXT (foreign-lambda void "Binormal3fvEXT" f32vector))) (begin (define Binormal3iEXT (foreign-lambda void "Binormal3iEXT" integer integer integer))) (begin (define Binormal3ivEXT (foreign-lambda void "Binormal3ivEXT" s32vector))) (begin (define Binormal3sEXT (foreign-lambda void "Binormal3sEXT" short short short))) (begin (define Binormal3svEXT (foreign-lambda void "Binormal3svEXT" s16vector))) (begin (define TangentPointerEXT (foreign-lambda void "TangentPointerEXT" unsigned-integer unsigned-integer (c-pointer void)))) (begin (define BinormalPointerEXT (foreign-lambda void "BinormalPointerEXT" unsigned-integer unsigned-integer (c-pointer void)))) (begin (define FinishTextureSUNX (foreign-lambda void "FinishTextureSUNX"))) (begin (define GlobalAlphaFactorbSUN (foreign-lambda void "GlobalAlphaFactorbSUN" char))) (begin (define GlobalAlphaFactorsSUN (foreign-lambda void "GlobalAlphaFactorsSUN" short))) (begin (define GlobalAlphaFactoriSUN (foreign-lambda void "GlobalAlphaFactoriSUN" integer))) (begin (define GlobalAlphaFactorfSUN (foreign-lambda void "GlobalAlphaFactorfSUN" float))) (begin (define GlobalAlphaFactordSUN (foreign-lambda void "GlobalAlphaFactordSUN" double))) (begin (define GlobalAlphaFactorubSUN (foreign-lambda void "GlobalAlphaFactorubSUN" unsigned-char))) (begin (define GlobalAlphaFactorusSUN (foreign-lambda void "GlobalAlphaFactorusSUN" unsigned-short))) (begin (define GlobalAlphaFactoruiSUN (foreign-lambda void "GlobalAlphaFactoruiSUN" unsigned-integer))) (begin (define ReplacementCodeuiSUN (foreign-lambda void "ReplacementCodeuiSUN" unsigned-integer))) (begin (define ReplacementCodeusSUN (foreign-lambda void "ReplacementCodeusSUN" unsigned-short))) (begin (define ReplacementCodeubSUN (foreign-lambda void "ReplacementCodeubSUN" unsigned-char))) (begin (define ReplacementCodeuivSUN (foreign-lambda void "ReplacementCodeuivSUN" u32vector))) (begin (define ReplacementCodeusvSUN (foreign-lambda void "ReplacementCodeusvSUN" u16vector))) (begin (define ReplacementCodeubvSUN (foreign-lambda void "ReplacementCodeubvSUN" u8vector))) (begin (define ReplacementCodePointerSUN (foreign-lambda void "ReplacementCodePointerSUN" unsigned-integer unsigned-integer (c-pointer (c-pointer (const void)))))) (begin (define Color4ubVertex2fSUN (foreign-lambda void "Color4ubVertex2fSUN" unsigned-char unsigned-char unsigned-char unsigned-char float float))) (begin (define Color4ubVertex2fvSUN (foreign-lambda void "Color4ubVertex2fvSUN" u8vector f32vector))) (begin (define Color4ubVertex3fSUN (foreign-lambda void "Color4ubVertex3fSUN" unsigned-char unsigned-char unsigned-char unsigned-char float float float))) (begin (define Color4ubVertex3fvSUN (foreign-lambda void "Color4ubVertex3fvSUN" u8vector f32vector))) (begin (define Color3fVertex3fSUN (foreign-lambda void "Color3fVertex3fSUN" float float float float float float))) (begin (define Color3fVertex3fvSUN (foreign-lambda void "Color3fVertex3fvSUN" f32vector f32vector))) (begin (define Normal3fVertex3fSUN (foreign-lambda void "Normal3fVertex3fSUN" float float float float float float))) (begin (define Normal3fVertex3fvSUN (foreign-lambda void "Normal3fVertex3fvSUN" f32vector f32vector))) (begin (define Color4fNormal3fVertex3fSUN (foreign-lambda void "Color4fNormal3fVertex3fSUN" float float float float float float float float float float))) (begin (define Color4fNormal3fVertex3fvSUN (foreign-lambda void "Color4fNormal3fVertex3fvSUN" f32vector f32vector f32vector))) (begin (define TexCoord2fVertex3fSUN (foreign-lambda void "TexCoord2fVertex3fSUN" float float float float float))) (begin (define TexCoord2fVertex3fvSUN (foreign-lambda void "TexCoord2fVertex3fvSUN" f32vector f32vector))) (begin (define TexCoord4fVertex4fSUN (foreign-lambda void "TexCoord4fVertex4fSUN" float float float float float float float float))) (begin (define TexCoord4fVertex4fvSUN (foreign-lambda void "TexCoord4fVertex4fvSUN" f32vector f32vector))) (begin (define TexCoord2fColor4ubVertex3fSUN (foreign-lambda void "TexCoord2fColor4ubVertex3fSUN" float float unsigned-char unsigned-char unsigned-char unsigned-char float float float))) (begin (define TexCoord2fColor4ubVertex3fvSUN (foreign-lambda void "TexCoord2fColor4ubVertex3fvSUN" f32vector u8vector f32vector))) (begin (define TexCoord2fColor3fVertex3fSUN (foreign-lambda void "TexCoord2fColor3fVertex3fSUN" float float float float float float float float))) (begin (define TexCoord2fColor3fVertex3fvSUN (foreign-lambda void "TexCoord2fColor3fVertex3fvSUN" f32vector f32vector f32vector))) (begin (define TexCoord2fNormal3fVertex3fSUN (foreign-lambda void "TexCoord2fNormal3fVertex3fSUN" float float float float float float float float))) (begin (define TexCoord2fNormal3fVertex3fvSUN (foreign-lambda void "TexCoord2fNormal3fVertex3fvSUN" f32vector f32vector f32vector))) (begin (define TexCoord2fColor4fNormal3fVertex3fSUN (foreign-lambda void "TexCoord2fColor4fNormal3fVertex3fSUN" float float float float float float float float float float float float))) (begin (define TexCoord2fColor4fNormal3fVertex3fvSUN (foreign-lambda void "TexCoord2fColor4fNormal3fVertex3fvSUN" f32vector f32vector f32vector f32vector))) (begin (define TexCoord4fColor4fNormal3fVertex4fSUN (foreign-lambda void "TexCoord4fColor4fNormal3fVertex4fSUN" float float float float float float float float float float float float float float float))) (begin (define TexCoord4fColor4fNormal3fVertex4fvSUN (foreign-lambda void "TexCoord4fColor4fNormal3fVertex4fvSUN" f32vector f32vector f32vector f32vector))) (begin (define ReplacementCodeuiVertex3fSUN (foreign-lambda void "ReplacementCodeuiVertex3fSUN" unsigned-integer float float float))) (begin (define ReplacementCodeuiVertex3fvSUN (foreign-lambda void "ReplacementCodeuiVertex3fvSUN" u32vector f32vector))) (begin (define ReplacementCodeuiColor4ubVertex3fSUN (foreign-lambda void "ReplacementCodeuiColor4ubVertex3fSUN" unsigned-integer unsigned-char unsigned-char unsigned-char unsigned-char float float float))) (begin (define ReplacementCodeuiColor4ubVertex3fvSUN (foreign-lambda void "ReplacementCodeuiColor4ubVertex3fvSUN" u32vector u8vector f32vector))) (begin (define ReplacementCodeuiColor3fVertex3fSUN (foreign-lambda void "ReplacementCodeuiColor3fVertex3fSUN" unsigned-integer float float float float float float))) (begin (define ReplacementCodeuiColor3fVertex3fvSUN (foreign-lambda void "ReplacementCodeuiColor3fVertex3fvSUN" u32vector f32vector f32vector))) (begin (define ReplacementCodeuiNormal3fVertex3fSUN (foreign-lambda void "ReplacementCodeuiNormal3fVertex3fSUN" unsigned-integer float float float float float float))) (begin (define ReplacementCodeuiNormal3fVertex3fvSUN (foreign-lambda void "ReplacementCodeuiNormal3fVertex3fvSUN" u32vector f32vector f32vector))) (begin (define ReplacementCodeuiColor4fNormal3fVertex3fSUN (foreign-lambda void "ReplacementCodeuiColor4fNormal3fVertex3fSUN" unsigned-integer float float float float float float float float float float))) (begin (define ReplacementCodeuiColor4fNormal3fVertex3fvSUN (foreign-lambda void "ReplacementCodeuiColor4fNormal3fVertex3fvSUN" u32vector f32vector f32vector f32vector))) (begin (define ReplacementCodeuiTexCoord2fVertex3fSUN (foreign-lambda void "ReplacementCodeuiTexCoord2fVertex3fSUN" unsigned-integer float float float float float))) (begin (define ReplacementCodeuiTexCoord2fVertex3fvSUN (foreign-lambda void "ReplacementCodeuiTexCoord2fVertex3fvSUN" u32vector f32vector f32vector))) (begin (define ReplacementCodeuiTexCoord2fNormal3fVertex3fSUN (foreign-lambda void "ReplacementCodeuiTexCoord2fNormal3fVertex3fSUN" unsigned-integer float float float float float float float float))) (begin (define ReplacementCodeuiTexCoord2fNormal3fVertex3fvSUN (foreign-lambda void "ReplacementCodeuiTexCoord2fNormal3fVertex3fvSUN" u32vector f32vector f32vector f32vector))) (begin (define ReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fSUN (foreign-lambda void "ReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fSUN" unsigned-integer float float float float float float float float float float float float))) (begin (define ReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fvSUN (foreign-lambda void "ReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fvSUN" u32vector f32vector f32vector f32vector f32vector))) (begin (define BlendFuncSeparateEXT (foreign-lambda void "BlendFuncSeparateEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define BlendFuncSeparateINGR (foreign-lambda void "BlendFuncSeparateINGR" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define VertexWeightfEXT (foreign-lambda void "VertexWeightfEXT" float))) (begin (define VertexWeightfvEXT (foreign-lambda void "VertexWeightfvEXT" f32vector))) (begin (define VertexWeightPointerEXT (foreign-lambda void "VertexWeightPointerEXT" unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define FlushVertexArrayRangeNV (foreign-lambda void "FlushVertexArrayRangeNV"))) (begin (define VertexArrayRangeNV (foreign-lambda void "VertexArrayRangeNV" unsigned-integer (c-pointer void)))) (begin (define CombinerParameterfvNV (foreign-lambda void "CombinerParameterfvNV" unsigned-integer f32vector))) (begin (define CombinerParameterfNV (foreign-lambda void "CombinerParameterfNV" unsigned-integer float))) (begin (define CombinerParameterivNV (foreign-lambda void "CombinerParameterivNV" unsigned-integer s32vector))) (begin (define CombinerParameteriNV (foreign-lambda void "CombinerParameteriNV" unsigned-integer integer))) (begin (define CombinerInputNV (foreign-lambda void "CombinerInputNV" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define CombinerOutputNV (foreign-lambda void "CombinerOutputNV" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-char unsigned-char unsigned-char))) (begin (define FinalCombinerInputNV (foreign-lambda void "FinalCombinerInputNV" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define GetCombinerInputParameterfvNV (foreign-lambda void "GetCombinerInputParameterfvNV" unsigned-integer unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define GetCombinerInputParameterivNV (foreign-lambda void "GetCombinerInputParameterivNV" unsigned-integer unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GetCombinerOutputParameterfvNV (foreign-lambda void "GetCombinerOutputParameterfvNV" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define GetCombinerOutputParameterivNV (foreign-lambda void "GetCombinerOutputParameterivNV" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GetFinalCombinerInputParameterfvNV (foreign-lambda void "GetFinalCombinerInputParameterfvNV" unsigned-integer unsigned-integer f32vector))) (begin (define GetFinalCombinerInputParameterivNV (foreign-lambda void "GetFinalCombinerInputParameterivNV" unsigned-integer unsigned-integer s32vector))) (begin (define ResizeBuffersMESA (foreign-lambda void "ResizeBuffersMESA"))) (begin (define WindowPos2dMESA (foreign-lambda void "WindowPos2dMESA" double double))) (begin (define WindowPos2dvMESA (foreign-lambda void "WindowPos2dvMESA" f64vector))) (begin (define WindowPos2fMESA (foreign-lambda void "WindowPos2fMESA" float float))) (begin (define WindowPos2fvMESA (foreign-lambda void "WindowPos2fvMESA" f32vector))) (begin (define WindowPos2iMESA (foreign-lambda void "WindowPos2iMESA" integer integer))) (begin (define WindowPos2ivMESA (foreign-lambda void "WindowPos2ivMESA" s32vector))) (begin (define WindowPos2sMESA (foreign-lambda void "WindowPos2sMESA" short short))) (begin (define WindowPos2svMESA (foreign-lambda void "WindowPos2svMESA" s16vector))) (begin (define WindowPos3dMESA (foreign-lambda void "WindowPos3dMESA" double double double))) (begin (define WindowPos3dvMESA (foreign-lambda void "WindowPos3dvMESA" f64vector))) (begin (define WindowPos3fMESA (foreign-lambda void "WindowPos3fMESA" float float float))) (begin (define WindowPos3fvMESA (foreign-lambda void "WindowPos3fvMESA" f32vector))) (begin (define WindowPos3iMESA (foreign-lambda void "WindowPos3iMESA" integer integer integer))) (begin (define WindowPos3ivMESA (foreign-lambda void "WindowPos3ivMESA" s32vector))) (begin (define WindowPos3sMESA (foreign-lambda void "WindowPos3sMESA" short short short))) (begin (define WindowPos3svMESA (foreign-lambda void "WindowPos3svMESA" s16vector))) (begin (define WindowPos4dMESA (foreign-lambda void "WindowPos4dMESA" double double double double))) (begin (define WindowPos4dvMESA (foreign-lambda void "WindowPos4dvMESA" f64vector))) (begin (define WindowPos4fMESA (foreign-lambda void "WindowPos4fMESA" float float float float))) (begin (define WindowPos4fvMESA (foreign-lambda void "WindowPos4fvMESA" f32vector))) (begin (define WindowPos4iMESA (foreign-lambda void "WindowPos4iMESA" integer integer integer integer))) (begin (define WindowPos4ivMESA (foreign-lambda void "WindowPos4ivMESA" s32vector))) (begin (define WindowPos4sMESA (foreign-lambda void "WindowPos4sMESA" short short short short))) (begin (define WindowPos4svMESA (foreign-lambda void "WindowPos4svMESA" s16vector))) (begin (define MultiModeDrawArraysIBM (foreign-lambda void "MultiModeDrawArraysIBM" unsigned-integer s32vector u32vector unsigned-integer integer))) (begin (define MultiModeDrawElementsIBM (foreign-lambda void "MultiModeDrawElementsIBM" u32vector u32vector unsigned-integer (c-pointer (c-pointer (const void))) unsigned-integer integer))) (begin (define ColorPointerListIBM (foreign-lambda void "ColorPointerListIBM" integer unsigned-integer integer (c-pointer (c-pointer (const void))) integer))) (begin (define SecondaryColorPointerListIBM (foreign-lambda void "SecondaryColorPointerListIBM" integer unsigned-integer integer (c-pointer (c-pointer (const void))) integer))) (begin (define EdgeFlagPointerListIBM (foreign-lambda void "EdgeFlagPointerListIBM" integer (c-pointer (c-pointer (const unsigned-char))) integer))) (begin (define FogCoordPointerListIBM (foreign-lambda void "FogCoordPointerListIBM" unsigned-integer integer (c-pointer (c-pointer (const void))) integer))) (begin (define IndexPointerListIBM (foreign-lambda void "IndexPointerListIBM" unsigned-integer integer (c-pointer (c-pointer (const void))) integer))) (begin (define NormalPointerListIBM (foreign-lambda void "NormalPointerListIBM" unsigned-integer integer (c-pointer (c-pointer (const void))) integer))) (begin (define TexCoordPointerListIBM (foreign-lambda void "TexCoordPointerListIBM" integer unsigned-integer integer (c-pointer (c-pointer (const void))) integer))) (begin (define VertexPointerListIBM (foreign-lambda void "VertexPointerListIBM" integer unsigned-integer integer (c-pointer (c-pointer (const void))) integer))) (begin (define TbufferMask3DFX (foreign-lambda void "TbufferMask3DFX" unsigned-integer))) (begin (define SampleMaskEXT (foreign-lambda void "SampleMaskEXT" float unsigned-char))) (begin (define SamplePatternEXT (foreign-lambda void "SamplePatternEXT" unsigned-integer))) (begin (define TextureColorMaskSGIS (foreign-lambda void "TextureColorMaskSGIS" unsigned-char unsigned-char unsigned-char unsigned-char))) (begin (define IglooInterfaceSGIX (foreign-lambda void "IglooInterfaceSGIX" unsigned-integer (c-pointer void)))) (begin (define DeleteFencesNV (foreign-lambda void "DeleteFencesNV" unsigned-integer u32vector))) (begin (define GenFencesNV (foreign-lambda void "GenFencesNV" unsigned-integer u32vector))) (begin (define IsFenceNV (foreign-lambda unsigned-char "IsFenceNV" unsigned-integer))) (begin (define TestFenceNV (foreign-lambda unsigned-char "TestFenceNV" unsigned-integer))) (begin (define GetFenceivNV (foreign-lambda void "GetFenceivNV" unsigned-integer unsigned-integer s32vector))) (begin (define FinishFenceNV (foreign-lambda void "FinishFenceNV" unsigned-integer))) (begin (define SetFenceNV (foreign-lambda void "SetFenceNV" unsigned-integer unsigned-integer))) (begin (define MapControlPointsNV (foreign-lambda void "MapControlPointsNV" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer integer unsigned-char (c-pointer void)))) (begin (define MapParameterivNV (foreign-lambda void "MapParameterivNV" unsigned-integer unsigned-integer s32vector))) (begin (define MapParameterfvNV (foreign-lambda void "MapParameterfvNV" unsigned-integer unsigned-integer f32vector))) (begin (define GetMapControlPointsNV (foreign-lambda void "GetMapControlPointsNV" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-char (c-pointer void)))) (begin (define GetMapParameterivNV (foreign-lambda void "GetMapParameterivNV" unsigned-integer unsigned-integer s32vector))) (begin (define GetMapParameterfvNV (foreign-lambda void "GetMapParameterfvNV" unsigned-integer unsigned-integer f32vector))) (begin (define GetMapAttribParameterivNV (foreign-lambda void "GetMapAttribParameterivNV" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GetMapAttribParameterfvNV (foreign-lambda void "GetMapAttribParameterfvNV" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define EvalMapsNV (foreign-lambda void "EvalMapsNV" unsigned-integer unsigned-integer))) (begin (define CombinerStageParameterfvNV (foreign-lambda void "CombinerStageParameterfvNV" unsigned-integer unsigned-integer f32vector))) (begin (define GetCombinerStageParameterfvNV (foreign-lambda void "GetCombinerStageParameterfvNV" unsigned-integer unsigned-integer f32vector))) (begin (define AreProgramsResidentNV (foreign-lambda unsigned-char "AreProgramsResidentNV" unsigned-integer u32vector u8vector))) (begin (define BindProgramNV (foreign-lambda void "BindProgramNV" unsigned-integer unsigned-integer))) (begin (define DeleteProgramsNV (foreign-lambda void "DeleteProgramsNV" unsigned-integer u32vector))) (begin (define ExecuteProgramNV (foreign-lambda void "ExecuteProgramNV" unsigned-integer unsigned-integer f32vector))) (begin (define GenProgramsNV (foreign-lambda void "GenProgramsNV" unsigned-integer u32vector))) (begin (define GetProgramParameterdvNV (foreign-lambda void "GetProgramParameterdvNV" unsigned-integer unsigned-integer unsigned-integer f64vector))) (begin (define GetProgramParameterfvNV (foreign-lambda void "GetProgramParameterfvNV" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define GetProgramivNV (foreign-lambda void "GetProgramivNV" unsigned-integer unsigned-integer s32vector))) (begin (define GetProgramStringNV (foreign-lambda void "GetProgramStringNV" unsigned-integer unsigned-integer u8vector))) (begin (define GetTrackMatrixivNV (foreign-lambda void "GetTrackMatrixivNV" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GetVertexAttribdvNV (foreign-lambda void "GetVertexAttribdvNV" unsigned-integer unsigned-integer f64vector))) (begin (define GetVertexAttribfvNV (foreign-lambda void "GetVertexAttribfvNV" unsigned-integer unsigned-integer f32vector))) (begin (define GetVertexAttribivNV (foreign-lambda void "GetVertexAttribivNV" unsigned-integer unsigned-integer s32vector))) (begin (define GetVertexAttribPointervNV (foreign-lambda void "GetVertexAttribPointervNV" unsigned-integer unsigned-integer (c-pointer (c-pointer void))))) (begin (define IsProgramNV (foreign-lambda unsigned-char "IsProgramNV" unsigned-integer))) (begin (define LoadProgramNV (foreign-lambda void "LoadProgramNV" unsigned-integer unsigned-integer unsigned-integer u8vector))) (begin (define ProgramParameter4dNV (foreign-lambda void "ProgramParameter4dNV" unsigned-integer unsigned-integer double double double double))) (begin (define ProgramParameter4dvNV (foreign-lambda void "ProgramParameter4dvNV" unsigned-integer unsigned-integer f64vector))) (begin (define ProgramParameter4fNV (foreign-lambda void "ProgramParameter4fNV" unsigned-integer unsigned-integer float float float float))) (begin (define ProgramParameter4fvNV (foreign-lambda void "ProgramParameter4fvNV" unsigned-integer unsigned-integer f32vector))) (begin (define ProgramParameters4dvNV (foreign-lambda void "ProgramParameters4dvNV" unsigned-integer unsigned-integer unsigned-integer f64vector))) (begin (define ProgramParameters4fvNV (foreign-lambda void "ProgramParameters4fvNV" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define RequestResidentProgramsNV (foreign-lambda void "RequestResidentProgramsNV" unsigned-integer u32vector))) (begin (define TrackMatrixNV (foreign-lambda void "TrackMatrixNV" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define VertexAttribPointerNV (foreign-lambda void "VertexAttribPointerNV" unsigned-integer integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define VertexAttrib1dNV (foreign-lambda void "VertexAttrib1dNV" unsigned-integer double))) (begin (define VertexAttrib1dvNV (foreign-lambda void "VertexAttrib1dvNV" unsigned-integer f64vector))) (begin (define VertexAttrib1fNV (foreign-lambda void "VertexAttrib1fNV" unsigned-integer float))) (begin (define VertexAttrib1fvNV (foreign-lambda void "VertexAttrib1fvNV" unsigned-integer f32vector))) (begin (define VertexAttrib1sNV (foreign-lambda void "VertexAttrib1sNV" unsigned-integer short))) (begin (define VertexAttrib1svNV (foreign-lambda void "VertexAttrib1svNV" unsigned-integer s16vector))) (begin (define VertexAttrib2dNV (foreign-lambda void "VertexAttrib2dNV" unsigned-integer double double))) (begin (define VertexAttrib2dvNV (foreign-lambda void "VertexAttrib2dvNV" unsigned-integer f64vector))) (begin (define VertexAttrib2fNV (foreign-lambda void "VertexAttrib2fNV" unsigned-integer float float))) (begin (define VertexAttrib2fvNV (foreign-lambda void "VertexAttrib2fvNV" unsigned-integer f32vector))) (begin (define VertexAttrib2sNV (foreign-lambda void "VertexAttrib2sNV" unsigned-integer short short))) (begin (define VertexAttrib2svNV (foreign-lambda void "VertexAttrib2svNV" unsigned-integer s16vector))) (begin (define VertexAttrib3dNV (foreign-lambda void "VertexAttrib3dNV" unsigned-integer double double double))) (begin (define VertexAttrib3dvNV (foreign-lambda void "VertexAttrib3dvNV" unsigned-integer f64vector))) (begin (define VertexAttrib3fNV (foreign-lambda void "VertexAttrib3fNV" unsigned-integer float float float))) (begin (define VertexAttrib3fvNV (foreign-lambda void "VertexAttrib3fvNV" unsigned-integer f32vector))) (begin (define VertexAttrib3sNV (foreign-lambda void "VertexAttrib3sNV" unsigned-integer short short short))) (begin (define VertexAttrib3svNV (foreign-lambda void "VertexAttrib3svNV" unsigned-integer s16vector))) (begin (define VertexAttrib4dNV (foreign-lambda void "VertexAttrib4dNV" unsigned-integer double double double double))) (begin (define VertexAttrib4dvNV (foreign-lambda void "VertexAttrib4dvNV" unsigned-integer f64vector))) (begin (define VertexAttrib4fNV (foreign-lambda void "VertexAttrib4fNV" unsigned-integer float float float float))) (begin (define VertexAttrib4fvNV (foreign-lambda void "VertexAttrib4fvNV" unsigned-integer f32vector))) (begin (define VertexAttrib4sNV (foreign-lambda void "VertexAttrib4sNV" unsigned-integer short short short short))) (begin (define VertexAttrib4svNV (foreign-lambda void "VertexAttrib4svNV" unsigned-integer s16vector))) (begin (define VertexAttrib4ubNV (foreign-lambda void "VertexAttrib4ubNV" unsigned-integer unsigned-char unsigned-char unsigned-char unsigned-char))) (begin (define VertexAttrib4ubvNV (foreign-lambda void "VertexAttrib4ubvNV" unsigned-integer u8vector))) (begin (define VertexAttribs1dvNV (foreign-lambda void "VertexAttribs1dvNV" unsigned-integer unsigned-integer f64vector))) (begin (define VertexAttribs1fvNV (foreign-lambda void "VertexAttribs1fvNV" unsigned-integer unsigned-integer f32vector))) (begin (define VertexAttribs1svNV (foreign-lambda void "VertexAttribs1svNV" unsigned-integer unsigned-integer s16vector))) (begin (define VertexAttribs2dvNV (foreign-lambda void "VertexAttribs2dvNV" unsigned-integer unsigned-integer f64vector))) (begin (define VertexAttribs2fvNV (foreign-lambda void "VertexAttribs2fvNV" unsigned-integer unsigned-integer f32vector))) (begin (define VertexAttribs2svNV (foreign-lambda void "VertexAttribs2svNV" unsigned-integer unsigned-integer s16vector))) (begin (define VertexAttribs3dvNV (foreign-lambda void "VertexAttribs3dvNV" unsigned-integer unsigned-integer f64vector))) (begin (define VertexAttribs3fvNV (foreign-lambda void "VertexAttribs3fvNV" unsigned-integer unsigned-integer f32vector))) (begin (define VertexAttribs3svNV (foreign-lambda void "VertexAttribs3svNV" unsigned-integer unsigned-integer s16vector))) (begin (define VertexAttribs4dvNV (foreign-lambda void "VertexAttribs4dvNV" unsigned-integer unsigned-integer f64vector))) (begin (define VertexAttribs4fvNV (foreign-lambda void "VertexAttribs4fvNV" unsigned-integer unsigned-integer f32vector))) (begin (define VertexAttribs4svNV (foreign-lambda void "VertexAttribs4svNV" unsigned-integer unsigned-integer s16vector))) (begin (define VertexAttribs4ubvNV (foreign-lambda void "VertexAttribs4ubvNV" unsigned-integer unsigned-integer u8vector))) (begin (define TexBumpParameterivATI (foreign-lambda void "TexBumpParameterivATI" unsigned-integer s32vector))) (begin (define TexBumpParameterfvATI (foreign-lambda void "TexBumpParameterfvATI" unsigned-integer f32vector))) (begin (define GetTexBumpParameterivATI (foreign-lambda void "GetTexBumpParameterivATI" unsigned-integer s32vector))) (begin (define GetTexBumpParameterfvATI (foreign-lambda void "GetTexBumpParameterfvATI" unsigned-integer f32vector))) (begin (define GenFragmentShadersATI (foreign-lambda unsigned-integer "GenFragmentShadersATI" unsigned-integer))) (begin (define BindFragmentShaderATI (foreign-lambda void "BindFragmentShaderATI" unsigned-integer))) (begin (define DeleteFragmentShaderATI (foreign-lambda void "DeleteFragmentShaderATI" unsigned-integer))) (begin (define BeginFragmentShaderATI (foreign-lambda void "BeginFragmentShaderATI"))) (begin (define EndFragmentShaderATI (foreign-lambda void "EndFragmentShaderATI"))) (begin (define PassTexCoordATI (foreign-lambda void "PassTexCoordATI" unsigned-integer unsigned-integer unsigned-integer))) (begin (define SampleMapATI (foreign-lambda void "SampleMapATI" unsigned-integer unsigned-integer unsigned-integer))) (begin (define ColorFragmentOp1ATI (foreign-lambda void "ColorFragmentOp1ATI" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define ColorFragmentOp2ATI (foreign-lambda void "ColorFragmentOp2ATI" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define ColorFragmentOp3ATI (foreign-lambda void "ColorFragmentOp3ATI" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define AlphaFragmentOp1ATI (foreign-lambda void "AlphaFragmentOp1ATI" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define AlphaFragmentOp2ATI (foreign-lambda void "AlphaFragmentOp2ATI" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define AlphaFragmentOp3ATI (foreign-lambda void "AlphaFragmentOp3ATI" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define SetFragmentShaderConstantATI (foreign-lambda void "SetFragmentShaderConstantATI" unsigned-integer f32vector))) (begin (define PNTrianglesiATI (foreign-lambda void "PNTrianglesiATI" unsigned-integer integer))) (begin (define PNTrianglesfATI (foreign-lambda void "PNTrianglesfATI" unsigned-integer float))) (begin (define NewObjectBufferATI (foreign-lambda unsigned-integer "NewObjectBufferATI" unsigned-integer (c-pointer void) unsigned-integer))) (begin (define IsObjectBufferATI (foreign-lambda unsigned-char "IsObjectBufferATI" unsigned-integer))) (begin (define UpdateObjectBufferATI (foreign-lambda void "UpdateObjectBufferATI" unsigned-integer unsigned-integer unsigned-integer (c-pointer void) unsigned-integer))) (begin (define GetObjectBufferfvATI (foreign-lambda void "GetObjectBufferfvATI" unsigned-integer unsigned-integer f32vector))) (begin (define GetObjectBufferivATI (foreign-lambda void "GetObjectBufferivATI" unsigned-integer unsigned-integer s32vector))) (begin (define FreeObjectBufferATI (foreign-lambda void "FreeObjectBufferATI" unsigned-integer))) (begin (define ArrayObjectATI (foreign-lambda void "ArrayObjectATI" unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define GetArrayObjectfvATI (foreign-lambda void "GetArrayObjectfvATI" unsigned-integer unsigned-integer f32vector))) (begin (define GetArrayObjectivATI (foreign-lambda void "GetArrayObjectivATI" unsigned-integer unsigned-integer s32vector))) (begin (define VariantArrayObjectATI (foreign-lambda void "VariantArrayObjectATI" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define GetVariantArrayObjectfvATI (foreign-lambda void "GetVariantArrayObjectfvATI" unsigned-integer unsigned-integer f32vector))) (begin (define GetVariantArrayObjectivATI (foreign-lambda void "GetVariantArrayObjectivATI" unsigned-integer unsigned-integer s32vector))) (begin (define BeginVertexShaderEXT (foreign-lambda void "BeginVertexShaderEXT"))) (begin (define EndVertexShaderEXT (foreign-lambda void "EndVertexShaderEXT"))) (begin (define BindVertexShaderEXT (foreign-lambda void "BindVertexShaderEXT" unsigned-integer))) (begin (define GenVertexShadersEXT (foreign-lambda unsigned-integer "GenVertexShadersEXT" unsigned-integer))) (begin (define DeleteVertexShaderEXT (foreign-lambda void "DeleteVertexShaderEXT" unsigned-integer))) (begin (define ShaderOp1EXT (foreign-lambda void "ShaderOp1EXT" unsigned-integer unsigned-integer unsigned-integer))) (begin (define ShaderOp2EXT (foreign-lambda void "ShaderOp2EXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define ShaderOp3EXT (foreign-lambda void "ShaderOp3EXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define SwizzleEXT (foreign-lambda void "SwizzleEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define WriteMaskEXT (foreign-lambda void "WriteMaskEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define InsertComponentEXT (foreign-lambda void "InsertComponentEXT" unsigned-integer unsigned-integer unsigned-integer))) (begin (define ExtractComponentEXT (foreign-lambda void "ExtractComponentEXT" unsigned-integer unsigned-integer unsigned-integer))) (begin (define GenSymbolsEXT (foreign-lambda unsigned-integer "GenSymbolsEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define SetInvariantEXT (foreign-lambda void "SetInvariantEXT" unsigned-integer unsigned-integer (c-pointer void)))) (begin (define SetLocalConstantEXT (foreign-lambda void "SetLocalConstantEXT" unsigned-integer unsigned-integer (c-pointer void)))) (begin (define VariantbvEXT (foreign-lambda void "VariantbvEXT" unsigned-integer c-string))) (begin (define VariantsvEXT (foreign-lambda void "VariantsvEXT" unsigned-integer s16vector))) (begin (define VariantivEXT (foreign-lambda void "VariantivEXT" unsigned-integer s32vector))) (begin (define VariantfvEXT (foreign-lambda void "VariantfvEXT" unsigned-integer f32vector))) (begin (define VariantdvEXT (foreign-lambda void "VariantdvEXT" unsigned-integer f64vector))) (begin (define VariantubvEXT (foreign-lambda void "VariantubvEXT" unsigned-integer u8vector))) (begin (define VariantusvEXT (foreign-lambda void "VariantusvEXT" unsigned-integer u16vector))) (begin (define VariantuivEXT (foreign-lambda void "VariantuivEXT" unsigned-integer u32vector))) (begin (define VariantPointerEXT (foreign-lambda void "VariantPointerEXT" unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define EnableVariantClientStateEXT (foreign-lambda void "EnableVariantClientStateEXT" unsigned-integer))) (begin (define DisableVariantClientStateEXT (foreign-lambda void "DisableVariantClientStateEXT" unsigned-integer))) (begin (define BindLightParameterEXT (foreign-lambda unsigned-integer "BindLightParameterEXT" unsigned-integer unsigned-integer))) (begin (define BindMaterialParameterEXT (foreign-lambda unsigned-integer "BindMaterialParameterEXT" unsigned-integer unsigned-integer))) (begin (define BindTexGenParameterEXT (foreign-lambda unsigned-integer "BindTexGenParameterEXT" unsigned-integer unsigned-integer unsigned-integer))) (begin (define BindTextureUnitParameterEXT (foreign-lambda unsigned-integer "BindTextureUnitParameterEXT" unsigned-integer unsigned-integer))) (begin (define BindParameterEXT (foreign-lambda unsigned-integer "BindParameterEXT" unsigned-integer))) (begin (define IsVariantEnabledEXT (foreign-lambda unsigned-char "IsVariantEnabledEXT" unsigned-integer unsigned-integer))) (begin (define GetVariantBooleanvEXT (foreign-lambda void "GetVariantBooleanvEXT" unsigned-integer unsigned-integer u8vector))) (begin (define GetVariantIntegervEXT (foreign-lambda void "GetVariantIntegervEXT" unsigned-integer unsigned-integer s32vector))) (begin (define GetVariantFloatvEXT (foreign-lambda void "GetVariantFloatvEXT" unsigned-integer unsigned-integer f32vector))) (begin (define GetVariantPointervEXT (foreign-lambda void "GetVariantPointervEXT" unsigned-integer unsigned-integer (c-pointer (c-pointer void))))) (begin (define GetInvariantBooleanvEXT (foreign-lambda void "GetInvariantBooleanvEXT" unsigned-integer unsigned-integer u8vector))) (begin (define GetInvariantIntegervEXT (foreign-lambda void "GetInvariantIntegervEXT" unsigned-integer unsigned-integer s32vector))) (begin (define GetInvariantFloatvEXT (foreign-lambda void "GetInvariantFloatvEXT" unsigned-integer unsigned-integer f32vector))) (begin (define GetLocalConstantBooleanvEXT (foreign-lambda void "GetLocalConstantBooleanvEXT" unsigned-integer unsigned-integer u8vector))) (begin (define GetLocalConstantIntegervEXT (foreign-lambda void "GetLocalConstantIntegervEXT" unsigned-integer unsigned-integer s32vector))) (begin (define GetLocalConstantFloatvEXT (foreign-lambda void "GetLocalConstantFloatvEXT" unsigned-integer unsigned-integer f32vector))) (begin (define VertexStream1sATI (foreign-lambda void "VertexStream1sATI" unsigned-integer short))) (begin (define VertexStream1svATI (foreign-lambda void "VertexStream1svATI" unsigned-integer s16vector))) (begin (define VertexStream1iATI (foreign-lambda void "VertexStream1iATI" unsigned-integer integer))) (begin (define VertexStream1ivATI (foreign-lambda void "VertexStream1ivATI" unsigned-integer s32vector))) (begin (define VertexStream1fATI (foreign-lambda void "VertexStream1fATI" unsigned-integer float))) (begin (define VertexStream1fvATI (foreign-lambda void "VertexStream1fvATI" unsigned-integer f32vector))) (begin (define VertexStream1dATI (foreign-lambda void "VertexStream1dATI" unsigned-integer double))) (begin (define VertexStream1dvATI (foreign-lambda void "VertexStream1dvATI" unsigned-integer f64vector))) (begin (define VertexStream2sATI (foreign-lambda void "VertexStream2sATI" unsigned-integer short short))) (begin (define VertexStream2svATI (foreign-lambda void "VertexStream2svATI" unsigned-integer s16vector))) (begin (define VertexStream2iATI (foreign-lambda void "VertexStream2iATI" unsigned-integer integer integer))) (begin (define VertexStream2ivATI (foreign-lambda void "VertexStream2ivATI" unsigned-integer s32vector))) (begin (define VertexStream2fATI (foreign-lambda void "VertexStream2fATI" unsigned-integer float float))) (begin (define VertexStream2fvATI (foreign-lambda void "VertexStream2fvATI" unsigned-integer f32vector))) (begin (define VertexStream2dATI (foreign-lambda void "VertexStream2dATI" unsigned-integer double double))) (begin (define VertexStream2dvATI (foreign-lambda void "VertexStream2dvATI" unsigned-integer f64vector))) (begin (define VertexStream3sATI (foreign-lambda void "VertexStream3sATI" unsigned-integer short short short))) (begin (define VertexStream3svATI (foreign-lambda void "VertexStream3svATI" unsigned-integer s16vector))) (begin (define VertexStream3iATI (foreign-lambda void "VertexStream3iATI" unsigned-integer integer integer integer))) (begin (define VertexStream3ivATI (foreign-lambda void "VertexStream3ivATI" unsigned-integer s32vector))) (begin (define VertexStream3fATI (foreign-lambda void "VertexStream3fATI" unsigned-integer float float float))) (begin (define VertexStream3fvATI (foreign-lambda void "VertexStream3fvATI" unsigned-integer f32vector))) (begin (define VertexStream3dATI (foreign-lambda void "VertexStream3dATI" unsigned-integer double double double))) (begin (define VertexStream3dvATI (foreign-lambda void "VertexStream3dvATI" unsigned-integer f64vector))) (begin (define VertexStream4sATI (foreign-lambda void "VertexStream4sATI" unsigned-integer short short short short))) (begin (define VertexStream4svATI (foreign-lambda void "VertexStream4svATI" unsigned-integer s16vector))) (begin (define VertexStream4iATI (foreign-lambda void "VertexStream4iATI" unsigned-integer integer integer integer integer))) (begin (define VertexStream4ivATI (foreign-lambda void "VertexStream4ivATI" unsigned-integer s32vector))) (begin (define VertexStream4fATI (foreign-lambda void "VertexStream4fATI" unsigned-integer float float float float))) (begin (define VertexStream4fvATI (foreign-lambda void "VertexStream4fvATI" unsigned-integer f32vector))) (begin (define VertexStream4dATI (foreign-lambda void "VertexStream4dATI" unsigned-integer double double double double))) (begin (define VertexStream4dvATI (foreign-lambda void "VertexStream4dvATI" unsigned-integer f64vector))) (begin (define NormalStream3bATI (foreign-lambda void "NormalStream3bATI" unsigned-integer char char char))) (begin (define NormalStream3bvATI (foreign-lambda void "NormalStream3bvATI" unsigned-integer c-string))) (begin (define NormalStream3sATI (foreign-lambda void "NormalStream3sATI" unsigned-integer short short short))) (begin (define NormalStream3svATI (foreign-lambda void "NormalStream3svATI" unsigned-integer s16vector))) (begin (define NormalStream3iATI (foreign-lambda void "NormalStream3iATI" unsigned-integer integer integer integer))) (begin (define NormalStream3ivATI (foreign-lambda void "NormalStream3ivATI" unsigned-integer s32vector))) (begin (define NormalStream3fATI (foreign-lambda void "NormalStream3fATI" unsigned-integer float float float))) (begin (define NormalStream3fvATI (foreign-lambda void "NormalStream3fvATI" unsigned-integer f32vector))) (begin (define NormalStream3dATI (foreign-lambda void "NormalStream3dATI" unsigned-integer double double double))) (begin (define NormalStream3dvATI (foreign-lambda void "NormalStream3dvATI" unsigned-integer f64vector))) (begin (define ClientActiveVertexStreamATI (foreign-lambda void "ClientActiveVertexStreamATI" unsigned-integer))) (begin (define VertexBlendEnviATI (foreign-lambda void "VertexBlendEnviATI" unsigned-integer integer))) (begin (define VertexBlendEnvfATI (foreign-lambda void "VertexBlendEnvfATI" unsigned-integer float))) (begin (define ElementPointerATI (foreign-lambda void "ElementPointerATI" unsigned-integer (c-pointer void)))) (begin (define DrawElementArrayATI (foreign-lambda void "DrawElementArrayATI" unsigned-integer unsigned-integer))) (begin (define DrawRangeElementArrayATI (foreign-lambda void "DrawRangeElementArrayATI" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define DrawMeshArraysSUN (foreign-lambda void "DrawMeshArraysSUN" unsigned-integer integer unsigned-integer unsigned-integer))) (begin (define GenOcclusionQueriesNV (foreign-lambda void "GenOcclusionQueriesNV" unsigned-integer u32vector))) (begin (define DeleteOcclusionQueriesNV (foreign-lambda void "DeleteOcclusionQueriesNV" unsigned-integer u32vector))) (begin (define IsOcclusionQueryNV (foreign-lambda unsigned-char "IsOcclusionQueryNV" unsigned-integer))) (begin (define BeginOcclusionQueryNV (foreign-lambda void "BeginOcclusionQueryNV" unsigned-integer))) (begin (define EndOcclusionQueryNV (foreign-lambda void "EndOcclusionQueryNV"))) (begin (define GetOcclusionQueryivNV (foreign-lambda void "GetOcclusionQueryivNV" unsigned-integer unsigned-integer s32vector))) (begin (define GetOcclusionQueryuivNV (foreign-lambda void "GetOcclusionQueryuivNV" unsigned-integer unsigned-integer u32vector))) (begin (define PointParameteriNV (foreign-lambda void "PointParameteriNV" unsigned-integer integer))) (begin (define PointParameterivNV (foreign-lambda void "PointParameterivNV" unsigned-integer s32vector))) (begin (define ActiveStencilFaceEXT (foreign-lambda void "ActiveStencilFaceEXT" unsigned-integer))) (begin (define ElementPointerAPPLE (foreign-lambda void "ElementPointerAPPLE" unsigned-integer (c-pointer void)))) (begin (define DrawElementArrayAPPLE (foreign-lambda void "DrawElementArrayAPPLE" unsigned-integer integer unsigned-integer))) (begin (define DrawRangeElementArrayAPPLE (foreign-lambda void "DrawRangeElementArrayAPPLE" unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer))) (begin (define MultiDrawElementArrayAPPLE (foreign-lambda void "MultiDrawElementArrayAPPLE" unsigned-integer s32vector u32vector unsigned-integer))) (begin (define MultiDrawRangeElementArrayAPPLE (foreign-lambda void "MultiDrawRangeElementArrayAPPLE" unsigned-integer unsigned-integer unsigned-integer s32vector u32vector unsigned-integer))) (begin (define GenFencesAPPLE (foreign-lambda void "GenFencesAPPLE" unsigned-integer u32vector))) (begin (define DeleteFencesAPPLE (foreign-lambda void "DeleteFencesAPPLE" unsigned-integer u32vector))) (begin (define SetFenceAPPLE (foreign-lambda void "SetFenceAPPLE" unsigned-integer))) (begin (define IsFenceAPPLE (foreign-lambda unsigned-char "IsFenceAPPLE" unsigned-integer))) (begin (define TestFenceAPPLE (foreign-lambda unsigned-char "TestFenceAPPLE" unsigned-integer))) (begin (define FinishFenceAPPLE (foreign-lambda void "FinishFenceAPPLE" unsigned-integer))) (begin (define TestObjectAPPLE (foreign-lambda unsigned-char "TestObjectAPPLE" unsigned-integer unsigned-integer))) (begin (define FinishObjectAPPLE (foreign-lambda void "FinishObjectAPPLE" unsigned-integer integer))) (begin (define BindVertexArrayAPPLE (foreign-lambda void "BindVertexArrayAPPLE" unsigned-integer))) (begin (define DeleteVertexArraysAPPLE (foreign-lambda void "DeleteVertexArraysAPPLE" unsigned-integer u32vector))) (begin (define GenVertexArraysAPPLE (foreign-lambda void "GenVertexArraysAPPLE" unsigned-integer u32vector))) (begin (define IsVertexArrayAPPLE (foreign-lambda unsigned-char "IsVertexArrayAPPLE" unsigned-integer))) (begin (define VertexArrayRangeAPPLE (foreign-lambda void "VertexArrayRangeAPPLE" unsigned-integer (c-pointer void)))) (begin (define FlushVertexArrayRangeAPPLE (foreign-lambda void "FlushVertexArrayRangeAPPLE" unsigned-integer (c-pointer void)))) (begin (define VertexArrayParameteriAPPLE (foreign-lambda void "VertexArrayParameteriAPPLE" unsigned-integer integer))) (begin (define DrawBuffersATI (foreign-lambda void "DrawBuffersATI" unsigned-integer u32vector))) (begin (define ProgramNamedParameter4fNV (foreign-lambda void "ProgramNamedParameter4fNV" unsigned-integer unsigned-integer u8vector float float float float))) (begin (define ProgramNamedParameter4dNV (foreign-lambda void "ProgramNamedParameter4dNV" unsigned-integer unsigned-integer u8vector double double double double))) (begin (define ProgramNamedParameter4fvNV (foreign-lambda void "ProgramNamedParameter4fvNV" unsigned-integer unsigned-integer u8vector f32vector))) (begin (define ProgramNamedParameter4dvNV (foreign-lambda void "ProgramNamedParameter4dvNV" unsigned-integer unsigned-integer u8vector f64vector))) (begin (define GetProgramNamedParameterfvNV (foreign-lambda void "GetProgramNamedParameterfvNV" unsigned-integer unsigned-integer u8vector f32vector))) (begin (define GetProgramNamedParameterdvNV (foreign-lambda void "GetProgramNamedParameterdvNV" unsigned-integer unsigned-integer u8vector f64vector))) (begin (define Vertex2hNV (foreign-lambda void "Vertex2hNV" unsigned-short unsigned-short))) (begin (define Vertex2hvNV (foreign-lambda void "Vertex2hvNV" u16vector))) (begin (define Vertex3hNV (foreign-lambda void "Vertex3hNV" unsigned-short unsigned-short unsigned-short))) (begin (define Vertex3hvNV (foreign-lambda void "Vertex3hvNV" u16vector))) (begin (define Vertex4hNV (foreign-lambda void "Vertex4hNV" unsigned-short unsigned-short unsigned-short unsigned-short))) (begin (define Vertex4hvNV (foreign-lambda void "Vertex4hvNV" u16vector))) (begin (define Normal3hNV (foreign-lambda void "Normal3hNV" unsigned-short unsigned-short unsigned-short))) (begin (define Normal3hvNV (foreign-lambda void "Normal3hvNV" u16vector))) (begin (define Color3hNV (foreign-lambda void "Color3hNV" unsigned-short unsigned-short unsigned-short))) (begin (define Color3hvNV (foreign-lambda void "Color3hvNV" u16vector))) (begin (define Color4hNV (foreign-lambda void "Color4hNV" unsigned-short unsigned-short unsigned-short unsigned-short))) (begin (define Color4hvNV (foreign-lambda void "Color4hvNV" u16vector))) (begin (define TexCoord1hNV (foreign-lambda void "TexCoord1hNV" unsigned-short))) (begin (define TexCoord1hvNV (foreign-lambda void "TexCoord1hvNV" u16vector))) (begin (define TexCoord2hNV (foreign-lambda void "TexCoord2hNV" unsigned-short unsigned-short))) (begin (define TexCoord2hvNV (foreign-lambda void "TexCoord2hvNV" u16vector))) (begin (define TexCoord3hNV (foreign-lambda void "TexCoord3hNV" unsigned-short unsigned-short unsigned-short))) (begin (define TexCoord3hvNV (foreign-lambda void "TexCoord3hvNV" u16vector))) (begin (define TexCoord4hNV (foreign-lambda void "TexCoord4hNV" unsigned-short unsigned-short unsigned-short unsigned-short))) (begin (define TexCoord4hvNV (foreign-lambda void "TexCoord4hvNV" u16vector))) (begin (define MultiTexCoord1hNV (foreign-lambda void "MultiTexCoord1hNV" unsigned-integer unsigned-short))) (begin (define MultiTexCoord1hvNV (foreign-lambda void "MultiTexCoord1hvNV" unsigned-integer u16vector))) (begin (define MultiTexCoord2hNV (foreign-lambda void "MultiTexCoord2hNV" unsigned-integer unsigned-short unsigned-short))) (begin (define MultiTexCoord2hvNV (foreign-lambda void "MultiTexCoord2hvNV" unsigned-integer u16vector))) (begin (define MultiTexCoord3hNV (foreign-lambda void "MultiTexCoord3hNV" unsigned-integer unsigned-short unsigned-short unsigned-short))) (begin (define MultiTexCoord3hvNV (foreign-lambda void "MultiTexCoord3hvNV" unsigned-integer u16vector))) (begin (define MultiTexCoord4hNV (foreign-lambda void "MultiTexCoord4hNV" unsigned-integer unsigned-short unsigned-short unsigned-short unsigned-short))) (begin (define MultiTexCoord4hvNV (foreign-lambda void "MultiTexCoord4hvNV" unsigned-integer u16vector))) (begin (define FogCoordhNV (foreign-lambda void "FogCoordhNV" unsigned-short))) (begin (define FogCoordhvNV (foreign-lambda void "FogCoordhvNV" u16vector))) (begin (define SecondaryColor3hNV (foreign-lambda void "SecondaryColor3hNV" unsigned-short unsigned-short unsigned-short))) (begin (define SecondaryColor3hvNV (foreign-lambda void "SecondaryColor3hvNV" u16vector))) (begin (define VertexWeighthNV (foreign-lambda void "VertexWeighthNV" unsigned-short))) (begin (define VertexWeighthvNV (foreign-lambda void "VertexWeighthvNV" u16vector))) (begin (define VertexAttrib1hNV (foreign-lambda void "VertexAttrib1hNV" unsigned-integer unsigned-short))) (begin (define VertexAttrib1hvNV (foreign-lambda void "VertexAttrib1hvNV" unsigned-integer u16vector))) (begin (define VertexAttrib2hNV (foreign-lambda void "VertexAttrib2hNV" unsigned-integer unsigned-short unsigned-short))) (begin (define VertexAttrib2hvNV (foreign-lambda void "VertexAttrib2hvNV" unsigned-integer u16vector))) (begin (define VertexAttrib3hNV (foreign-lambda void "VertexAttrib3hNV" unsigned-integer unsigned-short unsigned-short unsigned-short))) (begin (define VertexAttrib3hvNV (foreign-lambda void "VertexAttrib3hvNV" unsigned-integer u16vector))) (begin (define VertexAttrib4hNV (foreign-lambda void "VertexAttrib4hNV" unsigned-integer unsigned-short unsigned-short unsigned-short unsigned-short))) (begin (define VertexAttrib4hvNV (foreign-lambda void "VertexAttrib4hvNV" unsigned-integer u16vector))) (begin (define VertexAttribs1hvNV (foreign-lambda void "VertexAttribs1hvNV" unsigned-integer unsigned-integer u16vector))) (begin (define VertexAttribs2hvNV (foreign-lambda void "VertexAttribs2hvNV" unsigned-integer unsigned-integer u16vector))) (begin (define VertexAttribs3hvNV (foreign-lambda void "VertexAttribs3hvNV" unsigned-integer unsigned-integer u16vector))) (begin (define VertexAttribs4hvNV (foreign-lambda void "VertexAttribs4hvNV" unsigned-integer unsigned-integer u16vector))) (begin (define PixelDataRangeNV (foreign-lambda void "PixelDataRangeNV" unsigned-integer unsigned-integer (c-pointer void)))) (begin (define FlushPixelDataRangeNV (foreign-lambda void "FlushPixelDataRangeNV" unsigned-integer))) (begin (define PrimitiveRestartNV (foreign-lambda void "PrimitiveRestartNV"))) (begin (define PrimitiveRestartIndexNV (foreign-lambda void "PrimitiveRestartIndexNV" unsigned-integer))) (begin (define MapObjectBufferATI (foreign-lambda (c-pointer void) "MapObjectBufferATI" unsigned-integer))) (begin (define UnmapObjectBufferATI (foreign-lambda void "UnmapObjectBufferATI" unsigned-integer))) (begin (define StencilOpSeparateATI (foreign-lambda void "StencilOpSeparateATI" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define StencilFuncSeparateATI (foreign-lambda void "StencilFuncSeparateATI" unsigned-integer unsigned-integer integer unsigned-integer))) (begin (define VertexAttribArrayObjectATI (foreign-lambda void "VertexAttribArrayObjectATI" unsigned-integer integer unsigned-integer unsigned-char unsigned-integer unsigned-integer unsigned-integer))) (begin (define GetVertexAttribArrayObjectfvATI (foreign-lambda void "GetVertexAttribArrayObjectfvATI" unsigned-integer unsigned-integer f32vector))) (begin (define GetVertexAttribArrayObjectivATI (foreign-lambda void "GetVertexAttribArrayObjectivATI" unsigned-integer unsigned-integer s32vector))) (begin (define Vertex2bOES (foreign-lambda void "Vertex2bOES" char char))) (begin (define Vertex3bOES (foreign-lambda void "Vertex3bOES" char char char))) (begin (define Vertex4bOES (foreign-lambda void "Vertex4bOES" char char char char))) (begin (define Vertex2bvOES (foreign-lambda void "Vertex2bvOES" c-string))) (begin (define Vertex3bvOES (foreign-lambda void "Vertex3bvOES" c-string))) (begin (define Vertex4bvOES (foreign-lambda void "Vertex4bvOES" c-string))) (begin (define TexCoord1bOES (foreign-lambda void "TexCoord1bOES" char))) (begin (define TexCoord2bOES (foreign-lambda void "TexCoord2bOES" char char))) (begin (define TexCoord3bOES (foreign-lambda void "TexCoord3bOES" char char char))) (begin (define TexCoord4bOES (foreign-lambda void "TexCoord4bOES" char char char char))) (begin (define TexCoord1bvOES (foreign-lambda void "TexCoord1bvOES" c-string))) (begin (define TexCoord2bvOES (foreign-lambda void "TexCoord2bvOES" c-string))) (begin (define TexCoord3bvOES (foreign-lambda void "TexCoord3bvOES" c-string))) (begin (define TexCoord4bvOES (foreign-lambda void "TexCoord4bvOES" c-string))) (begin (define MultiTexCoord1bOES (foreign-lambda void "MultiTexCoord1bOES" unsigned-integer char))) (begin (define MultiTexCoord2bOES (foreign-lambda void "MultiTexCoord2bOES" unsigned-integer char char))) (begin (define MultiTexCoord3bOES (foreign-lambda void "MultiTexCoord3bOES" unsigned-integer char char char))) (begin (define MultiTexCoord4bOES (foreign-lambda void "MultiTexCoord4bOES" unsigned-integer char char char char))) (begin (define MultiTexCoord1bvOES (foreign-lambda void "MultiTexCoord1bvOES" unsigned-integer c-string))) (begin (define MultiTexCoord2bvOES (foreign-lambda void "MultiTexCoord2bvOES" unsigned-integer c-string))) (begin (define MultiTexCoord3bvOES (foreign-lambda void "MultiTexCoord3bvOES" unsigned-integer c-string))) (begin (define MultiTexCoord4bvOES (foreign-lambda void "MultiTexCoord4bvOES" unsigned-integer c-string))) (begin (define Vertex2xOES (foreign-lambda void "Vertex2xOES" integer integer))) (begin (define Vertex3xOES (foreign-lambda void "Vertex3xOES" integer integer integer))) (begin (define Vertex4xOES (foreign-lambda void "Vertex4xOES" integer integer integer integer))) (begin (define Vertex2xvOES (foreign-lambda void "Vertex2xvOES" s32vector))) (begin (define Vertex3xvOES (foreign-lambda void "Vertex3xvOES" s32vector))) (begin (define Vertex4xvOES (foreign-lambda void "Vertex4xvOES" s32vector))) (begin (define Normal3xOES (foreign-lambda void "Normal3xOES" integer integer integer))) (begin (define Normal3xvOES (foreign-lambda void "Normal3xvOES" s32vector))) (begin (define TexCoord1xOES (foreign-lambda void "TexCoord1xOES" integer))) (begin (define TexCoord2xOES (foreign-lambda void "TexCoord2xOES" integer integer))) (begin (define TexCoord3xOES (foreign-lambda void "TexCoord3xOES" integer integer integer))) (begin (define TexCoord4xOES (foreign-lambda void "TexCoord4xOES" integer integer integer integer))) (begin (define TexCoord1xvOES (foreign-lambda void "TexCoord1xvOES" s32vector))) (begin (define TexCoord2xvOES (foreign-lambda void "TexCoord2xvOES" s32vector))) (begin (define TexCoord3xvOES (foreign-lambda void "TexCoord3xvOES" s32vector))) (begin (define TexCoord4xvOES (foreign-lambda void "TexCoord4xvOES" s32vector))) (begin (define MultiTexCoord1xOES (foreign-lambda void "MultiTexCoord1xOES" unsigned-integer integer))) (begin (define MultiTexCoord2xOES (foreign-lambda void "MultiTexCoord2xOES" unsigned-integer integer integer))) (begin (define MultiTexCoord3xOES (foreign-lambda void "MultiTexCoord3xOES" unsigned-integer integer integer integer))) (begin (define MultiTexCoord4xOES (foreign-lambda void "MultiTexCoord4xOES" unsigned-integer integer integer integer integer))) (begin (define MultiTexCoord1xvOES (foreign-lambda void "MultiTexCoord1xvOES" unsigned-integer s32vector))) (begin (define MultiTexCoord2xvOES (foreign-lambda void "MultiTexCoord2xvOES" unsigned-integer s32vector))) (begin (define MultiTexCoord3xvOES (foreign-lambda void "MultiTexCoord3xvOES" unsigned-integer s32vector))) (begin (define MultiTexCoord4xvOES (foreign-lambda void "MultiTexCoord4xvOES" unsigned-integer s32vector))) (begin (define Color3xOES (foreign-lambda void "Color3xOES" integer integer integer))) (begin (define Color4xOES (foreign-lambda void "Color4xOES" integer integer integer integer))) (begin (define Color3xvOES (foreign-lambda void "Color3xvOES" s32vector))) (begin (define Color4xvOES (foreign-lambda void "Color4xvOES" s32vector))) (begin (define IndexxOES (foreign-lambda void "IndexxOES" integer))) (begin (define IndexxvOES (foreign-lambda void "IndexxvOES" s32vector))) (begin (define RectxOES (foreign-lambda void "RectxOES" integer integer integer integer))) (begin (define RectxvOES (foreign-lambda void "RectxvOES" s32vector s32vector))) (begin (define DepthRangexOES (foreign-lambda void "DepthRangexOES" integer integer))) (begin (define LoadMatrixxOES (foreign-lambda void "LoadMatrixxOES" s32vector))) (begin (define MultMatrixxOES (foreign-lambda void "MultMatrixxOES" s32vector))) (begin (define LoadTransposeMatrixxOES (foreign-lambda void "LoadTransposeMatrixxOES" s32vector))) (begin (define MultTransposeMatrixxOES (foreign-lambda void "MultTransposeMatrixxOES" s32vector))) (begin (define RotatexOES (foreign-lambda void "RotatexOES" integer integer integer integer))) (begin (define ScalexOES (foreign-lambda void "ScalexOES" integer integer integer))) (begin (define TranslatexOES (foreign-lambda void "TranslatexOES" integer integer integer))) (begin (define FrustumxOES (foreign-lambda void "FrustumxOES" integer integer integer integer integer integer))) (begin (define OrthoxOES (foreign-lambda void "OrthoxOES" integer integer integer integer integer integer))) (begin (define TexGenxOES (foreign-lambda void "TexGenxOES" unsigned-integer unsigned-integer integer))) (begin (define TexGenxvOES (foreign-lambda void "TexGenxvOES" unsigned-integer unsigned-integer s32vector))) (begin (define GetTexGenxvOES (foreign-lambda void "GetTexGenxvOES" unsigned-integer unsigned-integer s32vector))) (begin (define ClipPlanexOES (foreign-lambda void "ClipPlanexOES" unsigned-integer s32vector))) (begin (define GetClipPlanexOES (foreign-lambda void "GetClipPlanexOES" unsigned-integer s32vector))) (begin (define RasterPos2xOES (foreign-lambda void "RasterPos2xOES" integer integer))) (begin (define RasterPos3xOES (foreign-lambda void "RasterPos3xOES" integer integer integer))) (begin (define RasterPos4xOES (foreign-lambda void "RasterPos4xOES" integer integer integer integer))) (begin (define RasterPos2xvOES (foreign-lambda void "RasterPos2xvOES" s32vector))) (begin (define RasterPos3xvOES (foreign-lambda void "RasterPos3xvOES" s32vector))) (begin (define RasterPos4xvOES (foreign-lambda void "RasterPos4xvOES" s32vector))) (begin (define MaterialxOES (foreign-lambda void "MaterialxOES" unsigned-integer unsigned-integer integer))) (begin (define MaterialxvOES (foreign-lambda void "MaterialxvOES" unsigned-integer unsigned-integer s32vector))) (begin (define GetMaterialxOES (foreign-lambda void "GetMaterialxOES" unsigned-integer unsigned-integer s32vector))) (begin (define LightxOES (foreign-lambda void "LightxOES" unsigned-integer unsigned-integer integer))) (begin (define LightxvOES (foreign-lambda void "LightxvOES" unsigned-integer unsigned-integer s32vector))) (begin (define GetLightxOES (foreign-lambda void "GetLightxOES" unsigned-integer unsigned-integer s32vector))) (begin (define LightModelxOES (foreign-lambda void "LightModelxOES" unsigned-integer integer))) (begin (define LightModelxvOES (foreign-lambda void "LightModelxvOES" unsigned-integer s32vector))) (begin (define PointSizexOES (foreign-lambda void "PointSizexOES" integer))) (begin (define LineWidthxOES (foreign-lambda void "LineWidthxOES" integer))) (begin (define PolygonOffsetxOES (foreign-lambda void "PolygonOffsetxOES" integer integer))) (begin (define PixelStorex (foreign-lambda void "PixelStorex" unsigned-integer integer))) (begin (define PixelTransferxOES (foreign-lambda void "PixelTransferxOES" unsigned-integer integer))) (begin (define PixelMapx (foreign-lambda void "PixelMapx" unsigned-integer integer s32vector))) (begin (define GetPixelMapxv (foreign-lambda void "GetPixelMapxv" unsigned-integer integer s32vector))) (begin (define ConvolutionParameterxOES (foreign-lambda void "ConvolutionParameterxOES" unsigned-integer unsigned-integer integer))) (begin (define ConvolutionParameterxvOES (foreign-lambda void "ConvolutionParameterxvOES" unsigned-integer unsigned-integer s32vector))) (begin (define GetConvolutionParameterxvOES (foreign-lambda void "GetConvolutionParameterxvOES" unsigned-integer unsigned-integer s32vector))) (begin (define GetHistogramParameterxvOES (foreign-lambda void "GetHistogramParameterxvOES" unsigned-integer unsigned-integer s32vector))) (begin (define PixelZoomxOES (foreign-lambda void "PixelZoomxOES" integer integer))) (begin (define BitmapxOES (foreign-lambda void "BitmapxOES" unsigned-integer unsigned-integer integer integer integer integer u8vector))) (begin (define TexParameterxOES (foreign-lambda void "TexParameterxOES" unsigned-integer unsigned-integer integer))) (begin (define TexParameterxvOES (foreign-lambda void "TexParameterxvOES" unsigned-integer unsigned-integer s32vector))) (begin (define GetTexParameterxvOES (foreign-lambda void "GetTexParameterxvOES" unsigned-integer unsigned-integer s32vector))) (begin (define GetTexLevelParameterxvOES (foreign-lambda void "GetTexLevelParameterxvOES" unsigned-integer integer unsigned-integer s32vector))) (begin (define PrioritizeTexturesxOES (foreign-lambda void "PrioritizeTexturesxOES" unsigned-integer u32vector s32vector))) (begin (define TexEnvxOES (foreign-lambda void "TexEnvxOES" unsigned-integer unsigned-integer integer))) (begin (define TexEnvxvOES (foreign-lambda void "TexEnvxvOES" unsigned-integer unsigned-integer s32vector))) (begin (define GetTexEnvxvOES (foreign-lambda void "GetTexEnvxvOES" unsigned-integer unsigned-integer s32vector))) (begin (define FogxOES (foreign-lambda void "FogxOES" unsigned-integer integer))) (begin (define FogxvOES (foreign-lambda void "FogxvOES" unsigned-integer s32vector))) (begin (define SampleCoverageOES (foreign-lambda void "SampleCoverageOES" integer unsigned-char))) (begin (define AlphaFuncxOES (foreign-lambda void "AlphaFuncxOES" unsigned-integer integer))) (begin (define BlendColorxOES (foreign-lambda void "BlendColorxOES" integer integer integer integer))) (begin (define ClearColorxOES (foreign-lambda void "ClearColorxOES" integer integer integer integer))) (begin (define ClearDepthxOES (foreign-lambda void "ClearDepthxOES" integer))) (begin (define ClearAccumxOES (foreign-lambda void "ClearAccumxOES" integer integer integer integer))) (begin (define AccumxOES (foreign-lambda void "AccumxOES" unsigned-integer integer))) (begin (define Map1xOES (foreign-lambda void "Map1xOES" unsigned-integer integer integer integer integer s32vector))) (begin (define Map2xOES (foreign-lambda void "Map2xOES" unsigned-integer integer integer integer integer integer integer integer integer s32vector))) (begin (define MapGrid1xOES (foreign-lambda void "MapGrid1xOES" integer integer integer))) (begin (define MapGrid2xOES (foreign-lambda void "MapGrid2xOES" integer integer integer integer integer))) (begin (define GetMapxvOES (foreign-lambda void "GetMapxvOES" unsigned-integer unsigned-integer s32vector))) (begin (define EvalCoord1xOES (foreign-lambda void "EvalCoord1xOES" integer))) (begin (define EvalCoord2xOES (foreign-lambda void "EvalCoord2xOES" integer integer))) (begin (define EvalCoord1xvOES (foreign-lambda void "EvalCoord1xvOES" s32vector))) (begin (define EvalCoord2xvOES (foreign-lambda void "EvalCoord2xvOES" s32vector))) (begin (define FeedbackBufferxOES (foreign-lambda void "FeedbackBufferxOES" unsigned-integer unsigned-integer s32vector))) (begin (define PassThroughxOES (foreign-lambda void "PassThroughxOES" integer))) (begin (define GetFixedvOES (foreign-lambda void "GetFixedvOES" unsigned-integer s32vector))) (begin (define DepthRangefOES (foreign-lambda void "DepthRangefOES" float float))) (begin (define FrustumfOES (foreign-lambda void "FrustumfOES" float float float float float float))) (begin (define OrthofOES (foreign-lambda void "OrthofOES" float float float float float float))) (begin (define ClipPlanefOES (foreign-lambda void "ClipPlanefOES" unsigned-integer f32vector))) (begin (define GetClipPlanefOES (foreign-lambda void "GetClipPlanefOES" unsigned-integer f32vector))) (begin (define ClearDepthfOES (foreign-lambda void "ClearDepthfOES" double))) (begin (define QueryMatrixxOES (foreign-lambda unsigned-integer "QueryMatrixxOES" s32vector s32vector))) (begin (define DepthBoundsEXT (foreign-lambda void "DepthBoundsEXT" double double))) (begin (define BlendEquationSeparateEXT (foreign-lambda void "BlendEquationSeparateEXT" unsigned-integer unsigned-integer))) (begin (define IsRenderbufferEXT (foreign-lambda unsigned-char "IsRenderbufferEXT" unsigned-integer))) (begin (define BindRenderbufferEXT (foreign-lambda void "BindRenderbufferEXT" unsigned-integer unsigned-integer))) (begin (define DeleteRenderbuffersEXT (foreign-lambda void "DeleteRenderbuffersEXT" unsigned-integer u32vector))) (begin (define GenRenderbuffersEXT (foreign-lambda void "GenRenderbuffersEXT" unsigned-integer u32vector))) (begin (define RenderbufferStorageEXT (foreign-lambda void "RenderbufferStorageEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define GetRenderbufferParameterivEXT (foreign-lambda void "GetRenderbufferParameterivEXT" unsigned-integer unsigned-integer s32vector))) (begin (define IsFramebufferEXT (foreign-lambda unsigned-char "IsFramebufferEXT" unsigned-integer))) (begin (define BindFramebufferEXT (foreign-lambda void "BindFramebufferEXT" unsigned-integer unsigned-integer))) (begin (define DeleteFramebuffersEXT (foreign-lambda void "DeleteFramebuffersEXT" unsigned-integer u32vector))) (begin (define GenFramebuffersEXT (foreign-lambda void "GenFramebuffersEXT" unsigned-integer u32vector))) (begin (define CheckFramebufferStatusEXT (foreign-lambda unsigned-integer "CheckFramebufferStatusEXT" unsigned-integer))) (begin (define FramebufferTexture1DEXT (foreign-lambda void "FramebufferTexture1DEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define FramebufferTexture2DEXT (foreign-lambda void "FramebufferTexture2DEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define FramebufferTexture3DEXT (foreign-lambda void "FramebufferTexture3DEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer integer))) (begin (define FramebufferRenderbufferEXT (foreign-lambda void "FramebufferRenderbufferEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define GetFramebufferAttachmentParameterivEXT (foreign-lambda void "GetFramebufferAttachmentParameterivEXT" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GenerateMipmapEXT (foreign-lambda void "GenerateMipmapEXT" unsigned-integer))) (begin (define StringMarkerGREMEDY (foreign-lambda void "StringMarkerGREMEDY" unsigned-integer (c-pointer void)))) (begin (define StencilClearTagEXT (foreign-lambda void "StencilClearTagEXT" unsigned-integer unsigned-integer))) (begin (define BlitFramebufferEXT (foreign-lambda void "BlitFramebufferEXT" integer integer integer integer integer integer integer integer unsigned-integer unsigned-integer))) (begin (define RenderbufferStorageMultisampleEXT (foreign-lambda void "RenderbufferStorageMultisampleEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define GetQueryObjecti64vEXT (foreign-lambda void "GetQueryObjecti64vEXT" unsigned-integer unsigned-integer s32vector))) (begin (define GetQueryObjectui64vEXT (foreign-lambda void "GetQueryObjectui64vEXT" unsigned-integer unsigned-integer u32vector))) (begin (define ProgramEnvParameters4fvEXT (foreign-lambda void "ProgramEnvParameters4fvEXT" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define ProgramLocalParameters4fvEXT (foreign-lambda void "ProgramLocalParameters4fvEXT" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define BufferParameteriAPPLE (foreign-lambda void "BufferParameteriAPPLE" unsigned-integer unsigned-integer integer))) (begin (define FlushMappedBufferRangeAPPLE (foreign-lambda void "FlushMappedBufferRangeAPPLE" unsigned-integer integer integer))) (begin (define UniformBufferEXT (foreign-lambda void "UniformBufferEXT" unsigned-integer integer unsigned-integer))) (begin (define GetUniformBufferSizeEXT (foreign-lambda integer "GetUniformBufferSizeEXT" unsigned-integer integer))) (begin (define GetUniformOffsetEXT (foreign-lambda integer "GetUniformOffsetEXT" unsigned-integer integer))) (begin (define ColorMaskIndexedEXT (foreign-lambda void "ColorMaskIndexedEXT" unsigned-integer unsigned-char unsigned-char unsigned-char unsigned-char))) (begin (define GetBooleanIndexedvEXT (foreign-lambda void "GetBooleanIndexedvEXT" unsigned-integer unsigned-integer u8vector))) (begin (define GetIntegerIndexedvEXT (foreign-lambda void "GetIntegerIndexedvEXT" unsigned-integer unsigned-integer s32vector))) (begin (define EnableIndexedEXT (foreign-lambda void "EnableIndexedEXT" unsigned-integer unsigned-integer))) (begin (define DisableIndexedEXT (foreign-lambda void "DisableIndexedEXT" unsigned-integer unsigned-integer))) (begin (define IsEnabledIndexedEXT (foreign-lambda unsigned-char "IsEnabledIndexedEXT" unsigned-integer unsigned-integer))) (begin (define DrawArraysInstancedEXT (foreign-lambda void "DrawArraysInstancedEXT" unsigned-integer integer unsigned-integer unsigned-integer))) (begin (define DrawElementsInstancedEXT (foreign-lambda void "DrawElementsInstancedEXT" unsigned-integer unsigned-integer unsigned-integer (c-pointer void) unsigned-integer))) (begin (define ProgramParameteriEXT (foreign-lambda void "ProgramParameteriEXT" unsigned-integer unsigned-integer integer))) (begin (define FramebufferTextureEXT (foreign-lambda void "FramebufferTextureEXT" unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define FramebufferTextureLayerEXT (foreign-lambda void "FramebufferTextureLayerEXT" unsigned-integer unsigned-integer unsigned-integer integer integer))) (begin (define FramebufferTextureFaceEXT (foreign-lambda void "FramebufferTextureFaceEXT" unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer))) (begin (define VertexAttribI1iEXT (foreign-lambda void "VertexAttribI1iEXT" unsigned-integer integer))) (begin (define VertexAttribI2iEXT (foreign-lambda void "VertexAttribI2iEXT" unsigned-integer integer integer))) (begin (define VertexAttribI3iEXT (foreign-lambda void "VertexAttribI3iEXT" unsigned-integer integer integer integer))) (begin (define VertexAttribI4iEXT (foreign-lambda void "VertexAttribI4iEXT" unsigned-integer integer integer integer integer))) (begin (define VertexAttribI1uiEXT (foreign-lambda void "VertexAttribI1uiEXT" unsigned-integer unsigned-integer))) (begin (define VertexAttribI2uiEXT (foreign-lambda void "VertexAttribI2uiEXT" unsigned-integer unsigned-integer unsigned-integer))) (begin (define VertexAttribI3uiEXT (foreign-lambda void "VertexAttribI3uiEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define VertexAttribI4uiEXT (foreign-lambda void "VertexAttribI4uiEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define VertexAttribI1ivEXT (foreign-lambda void "VertexAttribI1ivEXT" unsigned-integer s32vector))) (begin (define VertexAttribI2ivEXT (foreign-lambda void "VertexAttribI2ivEXT" unsigned-integer s32vector))) (begin (define VertexAttribI3ivEXT (foreign-lambda void "VertexAttribI3ivEXT" unsigned-integer s32vector))) (begin (define VertexAttribI4ivEXT (foreign-lambda void "VertexAttribI4ivEXT" unsigned-integer s32vector))) (begin (define VertexAttribI1uivEXT (foreign-lambda void "VertexAttribI1uivEXT" unsigned-integer u32vector))) (begin (define VertexAttribI2uivEXT (foreign-lambda void "VertexAttribI2uivEXT" unsigned-integer u32vector))) (begin (define VertexAttribI3uivEXT (foreign-lambda void "VertexAttribI3uivEXT" unsigned-integer u32vector))) (begin (define VertexAttribI4uivEXT (foreign-lambda void "VertexAttribI4uivEXT" unsigned-integer u32vector))) (begin (define VertexAttribI4bvEXT (foreign-lambda void "VertexAttribI4bvEXT" unsigned-integer c-string))) (begin (define VertexAttribI4svEXT (foreign-lambda void "VertexAttribI4svEXT" unsigned-integer s16vector))) (begin (define VertexAttribI4ubvEXT (foreign-lambda void "VertexAttribI4ubvEXT" unsigned-integer u8vector))) (begin (define VertexAttribI4usvEXT (foreign-lambda void "VertexAttribI4usvEXT" unsigned-integer u16vector))) (begin (define VertexAttribIPointerEXT (foreign-lambda void "VertexAttribIPointerEXT" unsigned-integer integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetVertexAttribIivEXT (foreign-lambda void "GetVertexAttribIivEXT" unsigned-integer unsigned-integer s32vector))) (begin (define GetVertexAttribIuivEXT (foreign-lambda void "GetVertexAttribIuivEXT" unsigned-integer unsigned-integer s32vector))) (begin (define Uniform1uiEXT (foreign-lambda void "Uniform1uiEXT" integer unsigned-integer))) (begin (define Uniform2uiEXT (foreign-lambda void "Uniform2uiEXT" integer unsigned-integer unsigned-integer))) (begin (define Uniform3uiEXT (foreign-lambda void "Uniform3uiEXT" integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define Uniform4uiEXT (foreign-lambda void "Uniform4uiEXT" integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define Uniform1uivEXT (foreign-lambda void "Uniform1uivEXT" integer unsigned-integer u32vector))) (begin (define Uniform2uivEXT (foreign-lambda void "Uniform2uivEXT" integer unsigned-integer u32vector))) (begin (define Uniform3uivEXT (foreign-lambda void "Uniform3uivEXT" integer unsigned-integer u32vector))) (begin (define Uniform4uivEXT (foreign-lambda void "Uniform4uivEXT" integer unsigned-integer u32vector))) (begin (define GetUniformuivEXT (foreign-lambda void "GetUniformuivEXT" unsigned-integer integer s32vector))) (begin (define BindFragDataLocationEXT (foreign-lambda void "BindFragDataLocationEXT" unsigned-integer unsigned-integer c-string))) (begin (define GetFragDataLocationEXT (foreign-lambda integer "GetFragDataLocationEXT" unsigned-integer c-string))) (begin (define FramebufferTextureLayerEXT (foreign-lambda void "FramebufferTextureLayerEXT" unsigned-integer unsigned-integer unsigned-integer integer integer))) (begin (define TexBufferEXT (foreign-lambda void "TexBufferEXT" unsigned-integer unsigned-integer unsigned-integer))) (begin (define ClearColorIiEXT (foreign-lambda void "ClearColorIiEXT" integer integer integer integer))) (begin (define ClearColorIuiEXT (foreign-lambda void "ClearColorIuiEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define TexParameterIivEXT (foreign-lambda void "TexParameterIivEXT" unsigned-integer unsigned-integer s32vector))) (begin (define TexParameterIuivEXT (foreign-lambda void "TexParameterIuivEXT" unsigned-integer unsigned-integer u32vector))) (begin (define GetTexParameterIivEXT (foreign-lambda void "GetTexParameterIivEXT" unsigned-integer unsigned-integer s32vector))) (begin (define GetTexParameterIiuvEXT (foreign-lambda void "GetTexParameterIiuvEXT" unsigned-integer unsigned-integer u32vector))) (begin (define DepthRangedNV (foreign-lambda void "DepthRangedNV" double double))) (begin (define ClearDepthdNV (foreign-lambda void "ClearDepthdNV" double))) (begin (define DepthBoundsdNV (foreign-lambda void "DepthBoundsdNV" double double))) (begin (define RenderbufferStorageMultsampleCoverageNV (foreign-lambda void "RenderbufferStorageMultsampleCoverageNV" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define ProgramVertexLimitNV (foreign-lambda void "ProgramVertexLimitNV" unsigned-integer integer))) (begin (define FramebufferTextureEXT (foreign-lambda void "FramebufferTextureEXT" unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define FramebufferTextureLayerEXT (foreign-lambda void "FramebufferTextureLayerEXT" unsigned-integer unsigned-integer unsigned-integer integer integer))) (begin (define ProgramLocalParameterI4iNV (foreign-lambda void "ProgramLocalParameterI4iNV" unsigned-integer unsigned-integer integer integer integer integer))) (begin (define ProgramLocalParameterI4ivNV (foreign-lambda void "ProgramLocalParameterI4ivNV" unsigned-integer unsigned-integer s32vector))) (begin (define ProgramLocalParametersI4ivNV (foreign-lambda void "ProgramLocalParametersI4ivNV" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define ProgramLocalParameterI4uiNV (foreign-lambda void "ProgramLocalParameterI4uiNV" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define ProgramLocalParameterI4uivNV (foreign-lambda void "ProgramLocalParameterI4uivNV" unsigned-integer unsigned-integer u32vector))) (begin (define ProgramLocalParametersI4uivNV (foreign-lambda void "ProgramLocalParametersI4uivNV" unsigned-integer unsigned-integer unsigned-integer u32vector))) (begin (define ProgramEnvParameterI4iNV (foreign-lambda void "ProgramEnvParameterI4iNV" unsigned-integer unsigned-integer integer integer integer integer))) (begin (define ProgramEnvParameterI4ivNV (foreign-lambda void "ProgramEnvParameterI4ivNV" unsigned-integer unsigned-integer s32vector))) (begin (define ProgramEnvParametersI4ivNV (foreign-lambda void "ProgramEnvParametersI4ivNV" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define ProgramEnvParameterI4uiNV (foreign-lambda void "ProgramEnvParameterI4uiNV" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define ProgramEnvParameterI4uivNV (foreign-lambda void "ProgramEnvParameterI4uivNV" unsigned-integer unsigned-integer u32vector))) (begin (define ProgramEnvParametersI4uivNV (foreign-lambda void "ProgramEnvParametersI4uivNV" unsigned-integer unsigned-integer unsigned-integer u32vector))) (begin (define GetProgramLocalParameterIivNV (foreign-lambda void "GetProgramLocalParameterIivNV" unsigned-integer unsigned-integer s32vector))) (begin (define GetProgramLocalParameterIuivNV (foreign-lambda void "GetProgramLocalParameterIuivNV" unsigned-integer unsigned-integer u32vector))) (begin (define GetProgramEnvParameterIivNV (foreign-lambda void "GetProgramEnvParameterIivNV" unsigned-integer unsigned-integer s32vector))) (begin (define GetProgramEnvParameterIuivNV (foreign-lambda void "GetProgramEnvParameterIuivNV" unsigned-integer unsigned-integer u32vector))) (begin (define BindBufferRangeNV (foreign-lambda void "BindBufferRangeNV" unsigned-integer unsigned-integer unsigned-integer integer integer))) (begin (define BindBufferOffsetNV (foreign-lambda void "BindBufferOffsetNV" unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define BindBufferBaseNV (foreign-lambda void "BindBufferBaseNV" unsigned-integer unsigned-integer unsigned-integer))) (begin (define ProgramBufferParametersfvNV (foreign-lambda void "ProgramBufferParametersfvNV" unsigned-integer unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define ProgramBufferParametersIivNV (foreign-lambda void "ProgramBufferParametersIivNV" unsigned-integer unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define ProgramBufferParametersIuivNV (foreign-lambda void "ProgramBufferParametersIuivNV" unsigned-integer unsigned-integer unsigned-integer unsigned-integer u32vector))) (begin (define GetIntegerIndexedvEXT (foreign-lambda void "GetIntegerIndexedvEXT" unsigned-integer unsigned-integer u8vector))) (begin (define BindBufferRangeNV (foreign-lambda void "BindBufferRangeNV" unsigned-integer unsigned-integer unsigned-integer integer integer))) (begin (define BindBufferOffsetNV (foreign-lambda void "BindBufferOffsetNV" unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define BindBufferBaseNV (foreign-lambda void "BindBufferBaseNV" unsigned-integer unsigned-integer unsigned-integer))) (begin (define TransformFeedbackAttribsNV (foreign-lambda void "TransformFeedbackAttribsNV" unsigned-integer s32vector unsigned-integer))) (begin (define TransformFeedbackVaryingsNV (foreign-lambda void "TransformFeedbackVaryingsNV" unsigned-integer unsigned-integer s32vector unsigned-integer))) (begin (define BeginTransformFeedbackNV (foreign-lambda void "BeginTransformFeedbackNV" unsigned-integer))) (begin (define EndTransformFeedbackNV (foreign-lambda void "EndTransformFeedbackNV"))) (begin (define GetVaryingLocationNV (foreign-lambda integer "GetVaryingLocationNV" unsigned-integer c-string))) (begin (define GetActiveVaryingNV (foreign-lambda void "GetActiveVaryingNV" unsigned-integer unsigned-integer unsigned-integer u32vector u32vector u32vector c-string))) (begin (define ActiveVaryingNV (foreign-lambda void "ActiveVaryingNV" unsigned-integer c-string))) (begin (define GetTransformFeedbackVaryingNV (foreign-lambda void "GetTransformFeedbackVaryingNV" unsigned-integer unsigned-integer s32vector))) (begin (define GetBooleanIndexedvEXT (foreign-lambda void "GetBooleanIndexedvEXT" unsigned-integer unsigned-integer u8vector))) (begin (define VertexAttribI1iEXT (foreign-lambda void "VertexAttribI1iEXT" unsigned-integer integer))) (begin (define VertexAttribI2iEXT (foreign-lambda void "VertexAttribI2iEXT" unsigned-integer integer integer))) (begin (define VertexAttribI3iEXT (foreign-lambda void "VertexAttribI3iEXT" unsigned-integer integer integer integer))) (begin (define VertexAttribI4iEXT (foreign-lambda void "VertexAttribI4iEXT" unsigned-integer integer integer integer integer))) (begin (define VertexAttribI1uiEXT (foreign-lambda void "VertexAttribI1uiEXT" unsigned-integer unsigned-integer))) (begin (define VertexAttribI2uiEXT (foreign-lambda void "VertexAttribI2uiEXT" unsigned-integer unsigned-integer unsigned-integer))) (begin (define VertexAttribI3uiEXT (foreign-lambda void "VertexAttribI3uiEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define VertexAttribI4uiEXT (foreign-lambda void "VertexAttribI4uiEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define VertexAttribI1ivEXT (foreign-lambda void "VertexAttribI1ivEXT" unsigned-integer s32vector))) (begin (define VertexAttribI2ivEXT (foreign-lambda void "VertexAttribI2ivEXT" unsigned-integer s32vector))) (begin (define VertexAttribI3ivEXT (foreign-lambda void "VertexAttribI3ivEXT" unsigned-integer s32vector))) (begin (define VertexAttribI4ivEXT (foreign-lambda void "VertexAttribI4ivEXT" unsigned-integer s32vector))) (begin (define VertexAttribI1uivEXT (foreign-lambda void "VertexAttribI1uivEXT" unsigned-integer u32vector))) (begin (define VertexAttribI2uivEXT (foreign-lambda void "VertexAttribI2uivEXT" unsigned-integer u32vector))) (begin (define VertexAttribI3uivEXT (foreign-lambda void "VertexAttribI3uivEXT" unsigned-integer u32vector))) (begin (define VertexAttribI4uivEXT (foreign-lambda void "VertexAttribI4uivEXT" unsigned-integer u32vector))) (begin (define VertexAttribI4bvEXT (foreign-lambda void "VertexAttribI4bvEXT" unsigned-integer c-string))) (begin (define VertexAttribI4svEXT (foreign-lambda void "VertexAttribI4svEXT" unsigned-integer s16vector))) (begin (define VertexAttribI4ubvEXT (foreign-lambda void "VertexAttribI4ubvEXT" unsigned-integer u8vector))) (begin (define VertexAttribI4usvEXT (foreign-lambda void "VertexAttribI4usvEXT" unsigned-integer u16vector))) (begin (define VertexAttribIPointerEXT (foreign-lambda void "VertexAttribIPointerEXT" unsigned-integer integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetVertexAttribIivEXT (foreign-lambda void "GetVertexAttribIivEXT" unsigned-integer unsigned-integer s32vector))) (begin (define GetVertexAttribIuivEXT (foreign-lambda void "GetVertexAttribIuivEXT" unsigned-integer unsigned-integer s32vector))) (begin (define FrameTerminatorGREMEDY (foreign-lambda void "FrameTerminatorGREMEDY"))) (begin (define BeginConditionalRenderNV (foreign-lambda void "BeginConditionalRenderNV" unsigned-integer unsigned-integer))) (begin (define EndConditionalRenderNV (foreign-lambda void "EndConditionalRenderNV"))) (begin (define BeginTransformFeedbackEXT (foreign-lambda void "BeginTransformFeedbackEXT" unsigned-integer))) (begin (define EndTransformFeedbackEXT (foreign-lambda void "EndTransformFeedbackEXT"))) (begin (define BindBufferRangeEXT (foreign-lambda void "BindBufferRangeEXT" unsigned-integer unsigned-integer unsigned-integer integer integer))) (begin (define BindBufferOffsetEXT (foreign-lambda void "BindBufferOffsetEXT" unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define BindBufferBaseEXT (foreign-lambda void "BindBufferBaseEXT" unsigned-integer unsigned-integer unsigned-integer))) (begin (define TransformFeedbackVaryingsEXT (foreign-lambda void "TransformFeedbackVaryingsEXT" unsigned-integer unsigned-integer s32vector unsigned-integer))) (begin (define GetTransformFeedbackVaryingEXT (foreign-lambda void "GetTransformFeedbackVaryingEXT" unsigned-integer unsigned-integer s32vector))) (begin (define ClientAttribDefaultEXT (foreign-lambda void "ClientAttribDefaultEXT" unsigned-integer))) (begin (define PushClientAttribDefaultEXT (foreign-lambda void "PushClientAttribDefaultEXT" unsigned-integer))) (begin (define MatrixLoadfEXT (foreign-lambda void "MatrixLoadfEXT" unsigned-integer f32vector))) (begin (define MatrixLoaddEXT (foreign-lambda void "MatrixLoaddEXT" unsigned-integer f64vector))) (begin (define MatrixMultfEXT (foreign-lambda void "MatrixMultfEXT" unsigned-integer f32vector))) (begin (define MatrixMultdEXT (foreign-lambda void "MatrixMultdEXT" unsigned-integer f64vector))) (begin (define MatrixLoadIdentityEXT (foreign-lambda void "MatrixLoadIdentityEXT" unsigned-integer))) (begin (define MatrixRotatefEXT (foreign-lambda void "MatrixRotatefEXT" unsigned-integer float float float float))) (begin (define MatrixRotatedEXT (foreign-lambda void "MatrixRotatedEXT" unsigned-integer double double double double))) (begin (define MatrixScalefEXT (foreign-lambda void "MatrixScalefEXT" unsigned-integer float float float))) (begin (define MatrixScaledEXT (foreign-lambda void "MatrixScaledEXT" unsigned-integer double double double))) (begin (define MatrixTranslatefEXT (foreign-lambda void "MatrixTranslatefEXT" unsigned-integer float float float))) (begin (define MatrixTranslatedEXT (foreign-lambda void "MatrixTranslatedEXT" unsigned-integer double double double))) (begin (define MatrixFrustumEXT (foreign-lambda void "MatrixFrustumEXT" unsigned-integer double double double double double double))) (begin (define MatrixOrthoEXT (foreign-lambda void "MatrixOrthoEXT" unsigned-integer double double double double double double))) (begin (define MatrixPopEXT (foreign-lambda void "MatrixPopEXT" unsigned-integer))) (begin (define MatrixPushEXT (foreign-lambda void "MatrixPushEXT" unsigned-integer))) (begin (define MatrixLoadTransposefEXT (foreign-lambda void "MatrixLoadTransposefEXT" unsigned-integer f32vector))) (begin (define MatrixLoadTransposedEXT (foreign-lambda void "MatrixLoadTransposedEXT" unsigned-integer f64vector))) (begin (define MatrixMultTransposefEXT (foreign-lambda void "MatrixMultTransposefEXT" unsigned-integer f32vector))) (begin (define MatrixMultTransposedEXT (foreign-lambda void "MatrixMultTransposedEXT" unsigned-integer f64vector))) (begin (define TextureParameterfEXT (foreign-lambda void "TextureParameterfEXT" unsigned-integer unsigned-integer unsigned-integer float))) (begin (define TextureParameterfvEXT (foreign-lambda void "TextureParameterfvEXT" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define TextureParameteriEXT (foreign-lambda void "TextureParameteriEXT" unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define TextureParameterivEXT (foreign-lambda void "TextureParameterivEXT" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define TextureImage1DEXT (foreign-lambda void "TextureImage1DEXT" unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define TextureImage2DEXT (foreign-lambda void "TextureImage2DEXT" unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define TextureSubImage1DEXT (foreign-lambda void "TextureSubImage1DEXT" unsigned-integer unsigned-integer integer integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define TextureSubImage2DEXT (foreign-lambda void "TextureSubImage2DEXT" unsigned-integer unsigned-integer integer integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define CopyTextureImage1DEXT (foreign-lambda void "CopyTextureImage1DEXT" unsigned-integer unsigned-integer integer unsigned-integer integer integer unsigned-integer integer))) (begin (define CopyTextureImage2DEXT (foreign-lambda void "CopyTextureImage2DEXT" unsigned-integer unsigned-integer integer unsigned-integer integer integer unsigned-integer unsigned-integer integer))) (begin (define CopyTextureSubImage1DEXT (foreign-lambda void "CopyTextureSubImage1DEXT" unsigned-integer unsigned-integer integer integer integer integer unsigned-integer))) (begin (define CopyTextureSubImage2DEXT (foreign-lambda void "CopyTextureSubImage2DEXT" unsigned-integer unsigned-integer integer integer integer integer integer unsigned-integer unsigned-integer))) (begin (define GetTextureImageEXT (foreign-lambda void "GetTextureImageEXT" unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetTextureParameterfvEXT (foreign-lambda void "GetTextureParameterfvEXT" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define GetTextureParameterivEXT (foreign-lambda void "GetTextureParameterivEXT" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GetTextureLevelParameterfvEXT (foreign-lambda void "GetTextureLevelParameterfvEXT" unsigned-integer unsigned-integer integer unsigned-integer f32vector))) (begin (define GetTextureLevelParameterivEXT (foreign-lambda void "GetTextureLevelParameterivEXT" unsigned-integer unsigned-integer integer unsigned-integer s32vector))) (begin (define TextureImage3DEXT (foreign-lambda void "TextureImage3DEXT" unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define TextureSubImage3DEXT (foreign-lambda void "TextureSubImage3DEXT" unsigned-integer unsigned-integer integer integer integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define CopyTextureSubImage3DEXT (foreign-lambda void "CopyTextureSubImage3DEXT" unsigned-integer unsigned-integer integer integer integer integer integer integer unsigned-integer unsigned-integer))) (begin (define MultiTexParameterfEXT (foreign-lambda void "MultiTexParameterfEXT" unsigned-integer unsigned-integer unsigned-integer float))) (begin (define MultiTexParameterfvEXT (foreign-lambda void "MultiTexParameterfvEXT" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define MultiTexParameteriEXT (foreign-lambda void "MultiTexParameteriEXT" unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define MultiTexParameterivEXT (foreign-lambda void "MultiTexParameterivEXT" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define MultiTexImage1DEXT (foreign-lambda void "MultiTexImage1DEXT" unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define MultiTexImage2DEXT (foreign-lambda void "MultiTexImage2DEXT" unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define MultiTexSubImage1DEXT (foreign-lambda void "MultiTexSubImage1DEXT" unsigned-integer unsigned-integer integer integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define MultiTexSubImage2DEXT (foreign-lambda void "MultiTexSubImage2DEXT" unsigned-integer unsigned-integer integer integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define CopyMultiTexImage1DEXT (foreign-lambda void "CopyMultiTexImage1DEXT" unsigned-integer unsigned-integer integer unsigned-integer integer integer unsigned-integer integer))) (begin (define CopyMultiTexImage2DEXT (foreign-lambda void "CopyMultiTexImage2DEXT" unsigned-integer unsigned-integer integer unsigned-integer integer integer unsigned-integer unsigned-integer integer))) (begin (define CopyMultiTexSubImage1DEXT (foreign-lambda void "CopyMultiTexSubImage1DEXT" unsigned-integer unsigned-integer integer integer integer integer unsigned-integer))) (begin (define CopyMultiTexSubImage2DEXT (foreign-lambda void "CopyMultiTexSubImage2DEXT" unsigned-integer unsigned-integer integer integer integer integer integer unsigned-integer unsigned-integer))) (begin (define GetMultiTexImageEXT (foreign-lambda void "GetMultiTexImageEXT" unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetMultiTexParameterfvEXT (foreign-lambda void "GetMultiTexParameterfvEXT" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define GetMultiTexParameterivEXT (foreign-lambda void "GetMultiTexParameterivEXT" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GetMultiTexLevelParameterfvEXT (foreign-lambda void "GetMultiTexLevelParameterfvEXT" unsigned-integer unsigned-integer integer unsigned-integer f32vector))) (begin (define GetMultiTexLevelParameterivEXT (foreign-lambda void "GetMultiTexLevelParameterivEXT" unsigned-integer unsigned-integer integer unsigned-integer s32vector))) (begin (define MultiTexImage3DEXT (foreign-lambda void "MultiTexImage3DEXT" unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define MultiTexSubImage3DEXT (foreign-lambda void "MultiTexSubImage3DEXT" unsigned-integer unsigned-integer integer integer integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define CopyMultiTexSubImage3DEXT (foreign-lambda void "CopyMultiTexSubImage3DEXT" unsigned-integer unsigned-integer integer integer integer integer integer integer unsigned-integer unsigned-integer))) (begin (define BindMultiTextureEXT (foreign-lambda void "BindMultiTextureEXT" unsigned-integer unsigned-integer unsigned-integer))) (begin (define EnableClientStateIndexedEXT (foreign-lambda void "EnableClientStateIndexedEXT" unsigned-integer unsigned-integer))) (begin (define DisableClientStateIndexedEXT (foreign-lambda void "DisableClientStateIndexedEXT" unsigned-integer unsigned-integer))) (begin (define MultiTexCoordPointerEXT (foreign-lambda void "MultiTexCoordPointerEXT" unsigned-integer integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define MultiTexEnvfEXT (foreign-lambda void "MultiTexEnvfEXT" unsigned-integer unsigned-integer unsigned-integer float))) (begin (define MultiTexEnvfvEXT (foreign-lambda void "MultiTexEnvfvEXT" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define MultiTexEnviEXT (foreign-lambda void "MultiTexEnviEXT" unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define MultiTexEnvivEXT (foreign-lambda void "MultiTexEnvivEXT" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define MultiTexGendEXT (foreign-lambda void "MultiTexGendEXT" unsigned-integer unsigned-integer unsigned-integer double))) (begin (define MultiTexGendvEXT (foreign-lambda void "MultiTexGendvEXT" unsigned-integer unsigned-integer unsigned-integer f64vector))) (begin (define MultiTexGenfEXT (foreign-lambda void "MultiTexGenfEXT" unsigned-integer unsigned-integer unsigned-integer float))) (begin (define MultiTexGenfvEXT (foreign-lambda void "MultiTexGenfvEXT" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define MultiTexGeniEXT (foreign-lambda void "MultiTexGeniEXT" unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define MultiTexGenivEXT (foreign-lambda void "MultiTexGenivEXT" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GetMultiTexEnvfvEXT (foreign-lambda void "GetMultiTexEnvfvEXT" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define GetMultiTexEnvivEXT (foreign-lambda void "GetMultiTexEnvivEXT" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GetMultiTexGendvEXT (foreign-lambda void "GetMultiTexGendvEXT" unsigned-integer unsigned-integer unsigned-integer f64vector))) (begin (define GetMultiTexGenfvEXT (foreign-lambda void "GetMultiTexGenfvEXT" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define GetMultiTexGenivEXT (foreign-lambda void "GetMultiTexGenivEXT" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GetFloatIndexedvEXT (foreign-lambda void "GetFloatIndexedvEXT" unsigned-integer unsigned-integer f32vector))) (begin (define GetDoubleIndexedvEXT (foreign-lambda void "GetDoubleIndexedvEXT" unsigned-integer unsigned-integer f64vector))) (begin (define GetPointerIndexedvEXT (foreign-lambda void "GetPointerIndexedvEXT" unsigned-integer unsigned-integer (c-pointer (c-pointer void))))) (begin (define CompressedTextureImage3DEXT (foreign-lambda void "CompressedTextureImage3DEXT" unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer (c-pointer void)))) (begin (define CompressedTextureImage2DEXT (foreign-lambda void "CompressedTextureImage2DEXT" unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer (c-pointer void)))) (begin (define CompressedTextureImage1DEXT (foreign-lambda void "CompressedTextureImage1DEXT" unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer integer unsigned-integer (c-pointer void)))) (begin (define CompressedTextureSubImage3DEXT (foreign-lambda void "CompressedTextureSubImage3DEXT" unsigned-integer unsigned-integer integer integer integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define CompressedTextureSubImage2DEXT (foreign-lambda void "CompressedTextureSubImage2DEXT" unsigned-integer unsigned-integer integer integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define CompressedTextureSubImage1DEXT (foreign-lambda void "CompressedTextureSubImage1DEXT" unsigned-integer unsigned-integer integer integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetCompressedTextureImageEXT (foreign-lambda void "GetCompressedTextureImageEXT" unsigned-integer unsigned-integer integer (c-pointer void)))) (begin (define CompressedMultiTexImage3DEXT (foreign-lambda void "CompressedMultiTexImage3DEXT" unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer (c-pointer void)))) (begin (define CompressedMultiTexImage2DEXT (foreign-lambda void "CompressedMultiTexImage2DEXT" unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer (c-pointer void)))) (begin (define CompressedMultiTexImage1DEXT (foreign-lambda void "CompressedMultiTexImage1DEXT" unsigned-integer unsigned-integer integer unsigned-integer unsigned-integer integer unsigned-integer (c-pointer void)))) (begin (define CompressedMultiTexSubImage3DEXT (foreign-lambda void "CompressedMultiTexSubImage3DEXT" unsigned-integer unsigned-integer integer integer integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define CompressedMultiTexSubImage2DEXT (foreign-lambda void "CompressedMultiTexSubImage2DEXT" unsigned-integer unsigned-integer integer integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define CompressedMultiTexSubImage1DEXT (foreign-lambda void "CompressedMultiTexSubImage1DEXT" unsigned-integer unsigned-integer integer integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetCompressedMultiTexImageEXT (foreign-lambda void "GetCompressedMultiTexImageEXT" unsigned-integer unsigned-integer integer (c-pointer void)))) (begin (define NamedProgramStringEXT (foreign-lambda void "NamedProgramStringEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define NamedProgramLocalParameter4dEXT (foreign-lambda void "NamedProgramLocalParameter4dEXT" unsigned-integer unsigned-integer unsigned-integer double double double double))) (begin (define NamedProgramLocalParameter4dvEXT (foreign-lambda void "NamedProgramLocalParameter4dvEXT" unsigned-integer unsigned-integer unsigned-integer f64vector))) (begin (define NamedProgramLocalParameter4fEXT (foreign-lambda void "NamedProgramLocalParameter4fEXT" unsigned-integer unsigned-integer unsigned-integer float float float float))) (begin (define NamedProgramLocalParameter4fvEXT (foreign-lambda void "NamedProgramLocalParameter4fvEXT" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define GetNamedProgramLocalParameterdvEXT (foreign-lambda void "GetNamedProgramLocalParameterdvEXT" unsigned-integer unsigned-integer unsigned-integer f64vector))) (begin (define GetNamedProgramLocalParameterfvEXT (foreign-lambda void "GetNamedProgramLocalParameterfvEXT" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define GetNamedProgramivEXT (foreign-lambda void "GetNamedProgramivEXT" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GetNamedProgramStringEXT (foreign-lambda void "GetNamedProgramStringEXT" unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define NamedProgramLocalParameters4fvEXT (foreign-lambda void "NamedProgramLocalParameters4fvEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define NamedProgramLocalParameterI4iEXT (foreign-lambda void "NamedProgramLocalParameterI4iEXT" unsigned-integer unsigned-integer unsigned-integer integer integer integer integer))) (begin (define NamedProgramLocalParameterI4ivEXT (foreign-lambda void "NamedProgramLocalParameterI4ivEXT" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define NamedProgramLocalParametersI4ivEXT (foreign-lambda void "NamedProgramLocalParametersI4ivEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define NamedProgramLocalParameterI4uiEXT (foreign-lambda void "NamedProgramLocalParameterI4uiEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define NamedProgramLocalParameterI4uivEXT (foreign-lambda void "NamedProgramLocalParameterI4uivEXT" unsigned-integer unsigned-integer unsigned-integer u32vector))) (begin (define NamedProgramLocalParametersI4uivEXT (foreign-lambda void "NamedProgramLocalParametersI4uivEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer u32vector))) (begin (define GetNamedProgramLocalParameterIivEXT (foreign-lambda void "GetNamedProgramLocalParameterIivEXT" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GetNamedProgramLocalParameterIuivEXT (foreign-lambda void "GetNamedProgramLocalParameterIuivEXT" unsigned-integer unsigned-integer unsigned-integer u32vector))) (begin (define TextureParameterIivEXT (foreign-lambda void "TextureParameterIivEXT" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define TextureParameterIuivEXT (foreign-lambda void "TextureParameterIuivEXT" unsigned-integer unsigned-integer unsigned-integer u32vector))) (begin (define GetTextureParameterIivEXT (foreign-lambda void "GetTextureParameterIivEXT" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GetTextureParameterIuivEXT (foreign-lambda void "GetTextureParameterIuivEXT" unsigned-integer unsigned-integer unsigned-integer u32vector))) (begin (define MultiTexParameterIivEXT (foreign-lambda void "MultiTexParameterIivEXT" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define MultiTexParameterIuivEXT (foreign-lambda void "MultiTexParameterIuivEXT" unsigned-integer unsigned-integer unsigned-integer u32vector))) (begin (define GetMultiTexParameterIivEXT (foreign-lambda void "GetMultiTexParameterIivEXT" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GetMultiTexParameterIuivEXT (foreign-lambda void "GetMultiTexParameterIuivEXT" unsigned-integer unsigned-integer unsigned-integer u32vector))) (begin (define ProgramUniform1fEXT (foreign-lambda void "ProgramUniform1fEXT" unsigned-integer integer float))) (begin (define ProgramUniform2fEXT (foreign-lambda void "ProgramUniform2fEXT" unsigned-integer integer float float))) (begin (define ProgramUniform3fEXT (foreign-lambda void "ProgramUniform3fEXT" unsigned-integer integer float float float))) (begin (define ProgramUniform4fEXT (foreign-lambda void "ProgramUniform4fEXT" unsigned-integer integer float float float float))) (begin (define ProgramUniform1iEXT (foreign-lambda void "ProgramUniform1iEXT" unsigned-integer integer integer))) (begin (define ProgramUniform2iEXT (foreign-lambda void "ProgramUniform2iEXT" unsigned-integer integer integer integer))) (begin (define ProgramUniform3iEXT (foreign-lambda void "ProgramUniform3iEXT" unsigned-integer integer integer integer integer))) (begin (define ProgramUniform4iEXT (foreign-lambda void "ProgramUniform4iEXT" unsigned-integer integer integer integer integer integer))) (begin (define ProgramUniform1fvEXT (foreign-lambda void "ProgramUniform1fvEXT" unsigned-integer integer unsigned-integer f32vector))) (begin (define ProgramUniform2fvEXT (foreign-lambda void "ProgramUniform2fvEXT" unsigned-integer integer unsigned-integer f32vector))) (begin (define ProgramUniform3fvEXT (foreign-lambda void "ProgramUniform3fvEXT" unsigned-integer integer unsigned-integer f32vector))) (begin (define ProgramUniform4fvEXT (foreign-lambda void "ProgramUniform4fvEXT" unsigned-integer integer unsigned-integer f32vector))) (begin (define ProgramUniform1ivEXT (foreign-lambda void "ProgramUniform1ivEXT" unsigned-integer integer unsigned-integer s32vector))) (begin (define ProgramUniform2ivEXT (foreign-lambda void "ProgramUniform2ivEXT" unsigned-integer integer unsigned-integer s32vector))) (begin (define ProgramUniform3ivEXT (foreign-lambda void "ProgramUniform3ivEXT" unsigned-integer integer unsigned-integer s32vector))) (begin (define ProgramUniform4ivEXT (foreign-lambda void "ProgramUniform4ivEXT" unsigned-integer integer unsigned-integer s32vector))) (begin (define ProgramUniformMatrix2fvEXT (foreign-lambda void "ProgramUniformMatrix2fvEXT" unsigned-integer integer unsigned-integer unsigned-char f32vector))) (begin (define ProgramUniformMatrix3fvEXT (foreign-lambda void "ProgramUniformMatrix3fvEXT" unsigned-integer integer unsigned-integer unsigned-char f32vector))) (begin (define ProgramUniformMatrix4fvEXT (foreign-lambda void "ProgramUniformMatrix4fvEXT" unsigned-integer integer unsigned-integer unsigned-char f32vector))) (begin (define ProgramUniformMatrix2x3fvEXT (foreign-lambda void "ProgramUniformMatrix2x3fvEXT" unsigned-integer integer unsigned-integer unsigned-char f32vector))) (begin (define ProgramUniformMatrix3x2fvEXT (foreign-lambda void "ProgramUniformMatrix3x2fvEXT" unsigned-integer integer unsigned-integer unsigned-char f32vector))) (begin (define ProgramUniformMatrix2x4fvEXT (foreign-lambda void "ProgramUniformMatrix2x4fvEXT" unsigned-integer integer unsigned-integer unsigned-char f32vector))) (begin (define ProgramUniformMatrix4x2fvEXT (foreign-lambda void "ProgramUniformMatrix4x2fvEXT" unsigned-integer integer unsigned-integer unsigned-char f32vector))) (begin (define ProgramUniformMatrix3x4fvEXT (foreign-lambda void "ProgramUniformMatrix3x4fvEXT" unsigned-integer integer unsigned-integer unsigned-char f32vector))) (begin (define ProgramUniformMatrix4x3fvEXT (foreign-lambda void "ProgramUniformMatrix4x3fvEXT" unsigned-integer integer unsigned-integer unsigned-char f32vector))) (begin (define ProgramUniform1uiEXT (foreign-lambda void "ProgramUniform1uiEXT" unsigned-integer integer unsigned-integer))) (begin (define ProgramUniform2uiEXT (foreign-lambda void "ProgramUniform2uiEXT" unsigned-integer integer unsigned-integer unsigned-integer))) (begin (define ProgramUniform3uiEXT (foreign-lambda void "ProgramUniform3uiEXT" unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define ProgramUniform4uiEXT (foreign-lambda void "ProgramUniform4uiEXT" unsigned-integer integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define ProgramUniform1uivEXT (foreign-lambda void "ProgramUniform1uivEXT" unsigned-integer integer unsigned-integer u32vector))) (begin (define ProgramUniform2uivEXT (foreign-lambda void "ProgramUniform2uivEXT" unsigned-integer integer unsigned-integer u32vector))) (begin (define ProgramUniform3uivEXT (foreign-lambda void "ProgramUniform3uivEXT" unsigned-integer integer unsigned-integer u32vector))) (begin (define ProgramUniform4uivEXT (foreign-lambda void "ProgramUniform4uivEXT" unsigned-integer integer unsigned-integer u32vector))) (begin (define NamedBufferDataEXT (foreign-lambda void "NamedBufferDataEXT" unsigned-integer integer (c-pointer void) unsigned-integer))) (begin (define NamedBufferSubDataEXT (foreign-lambda void "NamedBufferSubDataEXT" unsigned-integer integer integer (c-pointer void)))) (begin (define MapNamedBufferEXT (foreign-lambda (c-pointer void) "MapNamedBufferEXT" unsigned-integer unsigned-integer))) (begin (define UnmapNamedBufferEXT (foreign-lambda unsigned-char "UnmapNamedBufferEXT" unsigned-integer))) (begin (define GetNamedBufferParameterivEXT (foreign-lambda void "GetNamedBufferParameterivEXT" unsigned-integer unsigned-integer s32vector))) (begin (define GetNamedBufferPointervEXT (foreign-lambda void "GetNamedBufferPointervEXT" unsigned-integer unsigned-integer (c-pointer (c-pointer void))))) (begin (define GetNamedBufferSubDataEXT (foreign-lambda void "GetNamedBufferSubDataEXT" unsigned-integer integer integer (c-pointer void)))) (begin (define TextureBufferEXT (foreign-lambda void "TextureBufferEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define MultiTexBufferEXT (foreign-lambda void "MultiTexBufferEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define NamedRenderbufferStorageEXT (foreign-lambda void "NamedRenderbufferStorageEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define GetNamedRenderbufferParameterivEXT (foreign-lambda void "GetNamedRenderbufferParameterivEXT" unsigned-integer unsigned-integer s32vector))) (begin (define CheckNamedFramebufferStatusEXT (foreign-lambda unsigned-integer "CheckNamedFramebufferStatusEXT" unsigned-integer unsigned-integer))) (begin (define NamedFramebufferTexture1DEXT (foreign-lambda void "NamedFramebufferTexture1DEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define NamedFramebufferTexture2DEXT (foreign-lambda void "NamedFramebufferTexture2DEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define NamedFramebufferTexture3DEXT (foreign-lambda void "NamedFramebufferTexture3DEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer integer integer))) (begin (define NamedFramebufferRenderbufferEXT (foreign-lambda void "NamedFramebufferRenderbufferEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define GetNamedFramebufferAttachmentParameterivEXT (foreign-lambda void "GetNamedFramebufferAttachmentParameterivEXT" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GenerateTextureMipmapEXT (foreign-lambda void "GenerateTextureMipmapEXT" unsigned-integer unsigned-integer))) (begin (define GenerateMultiTexMipmapEXT (foreign-lambda void "GenerateMultiTexMipmapEXT" unsigned-integer unsigned-integer))) (begin (define FramebufferDrawBufferEXT (foreign-lambda void "FramebufferDrawBufferEXT" unsigned-integer unsigned-integer))) (begin (define FramebufferDrawBuffersEXT (foreign-lambda void "FramebufferDrawBuffersEXT" unsigned-integer unsigned-integer u32vector))) (begin (define FramebufferReadBufferEXT (foreign-lambda void "FramebufferReadBufferEXT" unsigned-integer unsigned-integer))) (begin (define GetFramebufferParameterivEXT (foreign-lambda void "GetFramebufferParameterivEXT" unsigned-integer unsigned-integer s32vector))) (begin (define NamedRenderbufferStorageMultisampleEXT (foreign-lambda void "NamedRenderbufferStorageMultisampleEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define NamedRenderbufferStorageMultisampleCoverageEXT (foreign-lambda void "NamedRenderbufferStorageMultisampleCoverageEXT" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define NamedFramebufferTextureEXT (foreign-lambda void "NamedFramebufferTextureEXT" unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define NamedFramebufferTextureLayerEXT (foreign-lambda void "NamedFramebufferTextureLayerEXT" unsigned-integer unsigned-integer unsigned-integer integer integer))) (begin (define NamedFramebufferTextureFaceEXT (foreign-lambda void "NamedFramebufferTextureFaceEXT" unsigned-integer unsigned-integer unsigned-integer integer unsigned-integer))) (begin (define TextureRenderbufferEXT (foreign-lambda void "TextureRenderbufferEXT" unsigned-integer unsigned-integer unsigned-integer))) (begin (define MultiTexRenderbufferEXT (foreign-lambda void "MultiTexRenderbufferEXT" unsigned-integer unsigned-integer unsigned-integer))) (begin (define GetMultisamplefvNV (foreign-lambda void "GetMultisamplefvNV" unsigned-integer unsigned-integer f32vector))) (begin (define SampleMaskIndexedNV (foreign-lambda void "SampleMaskIndexedNV" unsigned-integer unsigned-integer))) (begin (define TexRenderbufferNV (foreign-lambda void "TexRenderbufferNV" unsigned-integer unsigned-integer))) (begin (define BindTransformFeedbackNV (foreign-lambda void "BindTransformFeedbackNV" unsigned-integer unsigned-integer))) (begin (define DeleteTransformFeedbacksNV (foreign-lambda void "DeleteTransformFeedbacksNV" unsigned-integer u32vector))) (begin (define GenTransformFeedbacksNV (foreign-lambda void "GenTransformFeedbacksNV" unsigned-integer u32vector))) (begin (define IsTransformFeedbackNV (foreign-lambda unsigned-char "IsTransformFeedbackNV" unsigned-integer))) (begin (define PauseTransformFeedbackNV (foreign-lambda void "PauseTransformFeedbackNV"))) (begin (define ResumeTransformFeedbackNV (foreign-lambda void "ResumeTransformFeedbackNV"))) (begin (define DrawTransformFeedbackNV (foreign-lambda void "DrawTransformFeedbackNV" unsigned-integer unsigned-integer))) (begin (define GetPerfMonitorGroupsAMD (foreign-lambda void "GetPerfMonitorGroupsAMD" s32vector unsigned-integer u32vector))) (begin (define GetPerfMonitorCountersAMD (foreign-lambda void "GetPerfMonitorCountersAMD" unsigned-integer s32vector s32vector unsigned-integer u32vector))) (begin (define GetPerfMonitorGroupStringAMD (foreign-lambda void "GetPerfMonitorGroupStringAMD" unsigned-integer unsigned-integer u32vector c-string))) (begin (define GetPerfMonitorCounterStringAMD (foreign-lambda void "GetPerfMonitorCounterStringAMD" unsigned-integer unsigned-integer unsigned-integer u32vector c-string))) (begin (define GetPerfMonitorCounterInfoAMD (foreign-lambda void "GetPerfMonitorCounterInfoAMD" unsigned-integer unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GenPerfMonitorsAMD (foreign-lambda void "GenPerfMonitorsAMD" unsigned-integer u32vector))) (begin (define DeletePerfMonitorsAMD (foreign-lambda void "DeletePerfMonitorsAMD" unsigned-integer u32vector))) (begin (define SelectPerfMonitorCountersAMD (foreign-lambda void "SelectPerfMonitorCountersAMD" unsigned-integer unsigned-char unsigned-integer integer u32vector))) (begin (define BeginPerfMonitorAMD (foreign-lambda void "BeginPerfMonitorAMD" unsigned-integer))) (begin (define EndPerfMonitorAMD (foreign-lambda void "EndPerfMonitorAMD" unsigned-integer))) (begin (define GetPerfMonitorCounterDataAMD (foreign-lambda void "GetPerfMonitorCounterDataAMD" unsigned-integer unsigned-integer unsigned-integer u32vector s32vector))) (begin (define TessellationFactorAMD (foreign-lambda void "TessellationFactorAMD" float))) (begin (define TessellationModeAMD (foreign-lambda void "TessellationModeAMD" unsigned-integer))) (begin (define ProvokingVertexEXT (foreign-lambda void "ProvokingVertexEXT" unsigned-integer))) (begin (define BlendFuncIndexedAMD (foreign-lambda void "BlendFuncIndexedAMD" unsigned-integer unsigned-integer unsigned-integer))) (begin (define BlendFuncSeparateIndexedAMD (foreign-lambda void "BlendFuncSeparateIndexedAMD" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define BlendEquationIndexedAMD (foreign-lambda void "BlendEquationIndexedAMD" unsigned-integer unsigned-integer))) (begin (define BlendEquationSeparateIndexedAMD (foreign-lambda void "BlendEquationSeparateIndexedAMD" unsigned-integer unsigned-integer unsigned-integer))) (begin (define TextureRangeAPPLE (foreign-lambda void "TextureRangeAPPLE" unsigned-integer unsigned-integer (c-pointer void)))) (begin (define GetTexParameterPointervAPPLE (foreign-lambda void "GetTexParameterPointervAPPLE" unsigned-integer unsigned-integer (c-pointer (c-pointer void))))) (begin (define EnableVertexAttribAPPLE (foreign-lambda void "EnableVertexAttribAPPLE" unsigned-integer unsigned-integer))) (begin (define DisableVertexAttribAPPLE (foreign-lambda void "DisableVertexAttribAPPLE" unsigned-integer unsigned-integer))) (begin (define IsVertexAttribEnabledAPPLE (foreign-lambda unsigned-char "IsVertexAttribEnabledAPPLE" unsigned-integer unsigned-integer))) (begin (define MapVertexAttrib1dAPPLE (foreign-lambda void "MapVertexAttrib1dAPPLE" unsigned-integer unsigned-integer double double integer integer f64vector))) (begin (define MapVertexAttrib1fAPPLE (foreign-lambda void "MapVertexAttrib1fAPPLE" unsigned-integer unsigned-integer float float integer integer f32vector))) (begin (define MapVertexAttrib2dAPPLE (foreign-lambda void "MapVertexAttrib2dAPPLE" unsigned-integer unsigned-integer double double integer integer double double integer integer f64vector))) (begin (define MapVertexAttrib2fAPPLE (foreign-lambda void "MapVertexAttrib2fAPPLE" unsigned-integer unsigned-integer float float integer integer float float integer integer f32vector))) (begin (define ObjectPurgeableAPPLE (foreign-lambda unsigned-integer "ObjectPurgeableAPPLE" unsigned-integer unsigned-integer unsigned-integer))) (begin (define ObjectUnpurgeableAPPLE (foreign-lambda unsigned-integer "ObjectUnpurgeableAPPLE" unsigned-integer unsigned-integer unsigned-integer))) (begin (define GetObjectParameterivAPPLE (foreign-lambda void "GetObjectParameterivAPPLE" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define BeginVideoCaptureNV (foreign-lambda void "BeginVideoCaptureNV" unsigned-integer))) (begin (define BindVideoCaptureStreamBufferNV (foreign-lambda void "BindVideoCaptureStreamBufferNV" unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define BindVideoCaptureStreamTextureNV (foreign-lambda void "BindVideoCaptureStreamTextureNV" unsigned-integer unsigned-integer unsigned-integer unsigned-integer unsigned-integer))) (begin (define EndVideoCaptureNV (foreign-lambda void "EndVideoCaptureNV" unsigned-integer))) (begin (define GetVideoCaptureivNV (foreign-lambda void "GetVideoCaptureivNV" unsigned-integer unsigned-integer s32vector))) (begin (define GetVideoCaptureStreamivNV (foreign-lambda void "GetVideoCaptureStreamivNV" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define GetVideoCaptureStreamfvNV (foreign-lambda void "GetVideoCaptureStreamfvNV" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define GetVideoCaptureStreamdvNV (foreign-lambda void "GetVideoCaptureStreamdvNV" unsigned-integer unsigned-integer unsigned-integer f64vector))) (begin (define VideoCaptureNV (foreign-lambda unsigned-integer "VideoCaptureNV" unsigned-integer u32vector u32vector))) (begin (define VideoCaptureStreamParameterivNV (foreign-lambda void "VideoCaptureStreamParameterivNV" unsigned-integer unsigned-integer unsigned-integer s32vector))) (begin (define VideoCaptureStreamParameterfvNV (foreign-lambda void "VideoCaptureStreamParameterfvNV" unsigned-integer unsigned-integer unsigned-integer f32vector))) (begin (define VideoCaptureStreamParameterdvNV (foreign-lambda void "VideoCaptureStreamParameterdvNV" unsigned-integer unsigned-integer unsigned-integer f64vector))) (begin (define UseShaderProgramEXT (foreign-lambda void "UseShaderProgramEXT" unsigned-integer unsigned-integer))) (begin (define ActiveProgramEXT (foreign-lambda void "ActiveProgramEXT" unsigned-integer))) (begin (define CreateShaderProgramEXT (foreign-lambda unsigned-integer "CreateShaderProgramEXT" unsigned-integer c-string))) (begin (define MakeBufferResidentNV (foreign-lambda void "MakeBufferResidentNV" unsigned-integer unsigned-integer))) (begin (define MakeBufferNonResidentNV (foreign-lambda void "MakeBufferNonResidentNV" unsigned-integer))) (begin (define IsBufferResidentNV (foreign-lambda unsigned-char "IsBufferResidentNV" unsigned-integer))) (begin (define MakeNamedBufferResidentNV (foreign-lambda void "MakeNamedBufferResidentNV" unsigned-integer unsigned-integer))) (begin (define MakeNamedBufferNonResidentNV (foreign-lambda void "MakeNamedBufferNonResidentNV" unsigned-integer))) (begin (define IsNamedBufferResidentNV (foreign-lambda unsigned-char "IsNamedBufferResidentNV" unsigned-integer))) (begin (define GetBufferParameterui64vNV (foreign-lambda void "GetBufferParameterui64vNV" unsigned-integer unsigned-integer u32vector))) (begin (define GetNamedBufferParameterui64vNV (foreign-lambda void "GetNamedBufferParameterui64vNV" unsigned-integer unsigned-integer u32vector))) (begin (define GetIntegerui64vNV (foreign-lambda void "GetIntegerui64vNV" unsigned-integer u32vector))) (begin (define Uniformui64NV (foreign-lambda void "Uniformui64NV" integer unsigned-integer))) (begin (define Uniformui64vNV (foreign-lambda void "Uniformui64vNV" integer unsigned-integer u32vector))) (begin (define GetUniformui64vNV (foreign-lambda void "GetUniformui64vNV" unsigned-integer integer u32vector))) (begin (define ProgramUniformui64NV (foreign-lambda void "ProgramUniformui64NV" unsigned-integer integer unsigned-integer))) (begin (define ProgramUniformui64vNV (foreign-lambda void "ProgramUniformui64vNV" unsigned-integer integer unsigned-integer u32vector))) (begin (define BufferAddressRangeNV (foreign-lambda void "BufferAddressRangeNV" unsigned-integer unsigned-integer unsigned-integer integer))) (begin (define VertexFormatNV (foreign-lambda void "VertexFormatNV" integer unsigned-integer unsigned-integer))) (begin (define NormalFormatNV (foreign-lambda void "NormalFormatNV" unsigned-integer unsigned-integer))) (begin (define ColorFormatNV (foreign-lambda void "ColorFormatNV" integer unsigned-integer unsigned-integer))) (begin (define IndexFormatNV (foreign-lambda void "IndexFormatNV" unsigned-integer unsigned-integer))) (begin (define TexCoordFormatNV (foreign-lambda void "TexCoordFormatNV" integer unsigned-integer unsigned-integer))) (begin (define EdgeFlagFormatNV (foreign-lambda void "EdgeFlagFormatNV" unsigned-integer))) (begin (define SecondaryColorFormatNV (foreign-lambda void "SecondaryColorFormatNV" integer unsigned-integer unsigned-integer))) (begin (define FogCoordFormatNV (foreign-lambda void "FogCoordFormatNV" unsigned-integer unsigned-integer))) (begin (define VertexAttribFormatNV (foreign-lambda void "VertexAttribFormatNV" unsigned-integer integer unsigned-integer unsigned-char unsigned-integer))) (begin (define VertexAttribIFormatNV (foreign-lambda void "VertexAttribIFormatNV" unsigned-integer integer unsigned-integer unsigned-integer))) (begin (define GetIntegerui64i_vNV (foreign-lambda void "GetIntegerui64i_vNV" unsigned-integer unsigned-integer u32vector))) (begin (define TextureBarrierNV (foreign-lambda void "TextureBarrierNV")))) ;;; END OF FILE