static VALUE gl_ExecuteProgramNV(VALUE obj,VALUE arg1,VALUE arg2,VALUE arg3)
{
GLfloat params[4] = {0,0,0,0};
LOAD_GL_FUNC(glExecuteProgramNV, "GL_NV_vertex_program");
ary2cflt(arg3,params,4);
fptr_glExecuteProgramNV(NUM2UINT(arg1),NUM2UINT(arg2),params);
CHECK_GLERROR_FROM("glExecuteProgramNV");
return Qnil;
}
static VALUE gl_PointParameterfvARB(VALUE obj,VALUE arg1,VALUE arg2)
{
GLfloat params[3] = {(GLfloat)0.0,(GLfloat)0.0,(GLfloat)0.0};
GLenum pname;
GLint size;
LOAD_GL_FUNC(glPointParameterfvARB, "GL_ARB_point_parameters");
pname = NUM2UINT(arg1);
Check_Type(arg2,T_ARRAY);
if (pname==GL_POINT_DISTANCE_ATTENUATION)
size = 3;
else
size = 1;
ary2cflt(arg2,params,size);
fptr_glPointParameterfvARB(pname,params);
CHECK_GLERROR_FROM("glPointParameterfvARB");
return Qnil;
}
