ruby-opengl2 0.60.3 → 0.60.4

data/Rakefile

@@ -60,7 +60,7 @@ task :test_all => [:test]
 # common specification for source and binary gems
 spec = Gem::Specification.new do |s|
     s.name              = "ruby-opengl2"
-    s.version           = "0.60.3"
+    s.version           = "0.60.4"
     s.authors           = [ "Alain Hoang", "Jan Dvorak", "Minh Thu Vo", "James Adam", "Paolo Bosetti" ]
     s.homepage          = "http://github.com/pbosetti/ruby-opengl"
     s.email             = "p4010@me.com"
@@ -72,6 +72,19 @@ spec = Gem::Specification.new do |s|
     s.has_rdoc          = false
     s.files             = FileList["{lib,ext,examples,test}/**/*"]
     s.extensions        = ['Rakefile']
+    
+    if s.respond_to? :specification_version then
+      current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+      s.specification_version = 3
+
+      if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+        s.add_runtime_dependency(%q<mkrf>, [">= 0.2.3"])
+      else
+        s.add_dependency(%q<mkrf>, [">= 0.2.3"])
+      end
+    else
+      s.add_dependency(%q<mkrf>, [">= 0.2.3"])
+    end
 end
 
 # Create a task for creating a ruby source gem

data/ext/common/conv.h

@@ -125,7 +125,7 @@ cond_GLBOOL2RUBY_FUNC(cond_GLBOOL2RUBY_D,GLdouble,rb_float_new)
 static inline int ary2c##_type_( arg, cary, maxlen ) \
 VALUE arg; \
 GL##_type_ cary[]; \
-int maxlen; \
+long maxlen; \
 { \
     int i; \
     VALUE ary = rb_Array(arg); \

data/ext/common/funcdef.h

@@ -206,7 +206,7 @@ static VALUE gl_##_name_(VALUE obj,VALUE arg1) \
 	GLsizei n; \
 	GLuint *objects; \
 	VALUE ret; \
-	unsigned int i; \
+	GLsizei i; \
 	LOAD_GL_FUNC(gl##_name_,_ver_) \
 	n = CONV_GLsizei(arg1); \
 	objects = ALLOC_N(GLuint, n); \
@@ -245,7 +245,7 @@ static VALUE gl_##_name_(VALUE obj,VALUE arg1) \
 	LOAD_GL_FUNC(gl##_name_,_ver_) \
 	if (TYPE(arg1)==T_ARRAY) { \
 		GLuint *objects; \
-		n = RARRAY_LEN(arg1); \
+		n = (GLsizei)RARRAY_LEN(arg1); \
 		objects = ALLOC_N(GLuint,n); \
 		ary2cuint(arg1,objects,n);  \
 		fptr_gl##_name_(n,objects); \
@@ -265,7 +265,7 @@ static VALUE gl_##_name_(VALUE obj,VALUE arg1) \
 	GLsizei n; \
 	if (TYPE(arg1)==T_ARRAY) { \
 		GLuint *objects; \
-		n = RARRAY_LEN(arg1); \
+		n = (GLsizei)RARRAY_LEN(arg1); \
 		objects = ALLOC_N(GLuint,n); \
 		ary2cuint(arg1,objects,n);  \
 		gl##_name_(n,objects); \

data/ext/gl/Rakefile

@@ -0,0 +1,43 @@
+# Generated by mkrf
+require 'rake/clean'
+
+CLEAN.include('*.o')
+CLOBBER.include('gl.bundle', 'mkrf.log')
+
+SRC = FileList['*.c']
+OBJ = SRC.ext('o')
+CC = 'clang'
+
+ADDITIONAL_OBJECTS = ''
+
+LDSHARED = "clang -dynamic -bundle  -framework OpenGL"
+
+LIBPATH =  "-L/Users/p4010/.rvm/rubies/ruby-1.9.3-p194/lib "
+
+INCLUDES = "-I/Users/p4010/.rvm/rubies/ruby-1.9.3-p194/include/ruby-1.9.1 -I/Users/p4010/.rvm/rubies/ruby-1.9.3-p194/include/ruby-1.9.1/x86_64-darwin12.0.0 -I/Users/p4010/.rvm/rubies/ruby-1.9.3-p194/lib/ruby/1.9.1/x86_64-darwin12.0.0 -I/Users/p4010/.rvm/rubies/ruby-1.9.3-p194/lib/ruby/site_ruby/1.9.1 -I."
+
+LIBS = "-lpthread -ldl -lobjc"
+
+CFLAGS = "-fno-common  -O3 -ggdb -Wextra -Wno-unused-parameter -Wno-parentheses -Wno-long-long -Wno-missing-field-initializers -Werror=pointer-arith -Werror=write-strings -Werror=declaration-after-statement -Werror=shorten-64-to-32 -Werror=implicit-function-declaration  -fno-common -pipe  -DRUBY_VERSION=193 "
+
+RUBYARCHDIR = "#{ENV["RUBYARCHDIR"]}"
+LIBRUBYARG_SHARED = "-lruby.1.9.1"
+
+task :default => ['gl.bundle']
+
+rule '.o' => '.c' do |t|
+  sh "#{CC} #{CFLAGS} #{INCLUDES} -c #{t.source}"
+end
+
+desc "Build this extension"
+file 'gl.bundle' => OBJ do
+  sh "#{LDSHARED} #{LIBPATH} -o gl.bundle #{OBJ} #{ADDITIONAL_OBJECTS} #{LIBS} #{LIBRUBYARG_SHARED}"
+end
+
+desc "Install this extension"
+task :install => 'gl.bundle' do
+  makedirs "#{RUBYARCHDIR}"
+  install "gl.bundle", "#{RUBYARCHDIR}"
+end
+
+

data/ext/gl/gl-1.0-1.1.c

@@ -235,7 +235,7 @@ VALUE obj,arg1,arg2;
 	VALUE lists;
 	type = CONV_GLenum(arg1);
 	lists = pack_array_or_pass_string(type,arg2);
-	n = RSTRING_LEN(lists) / gltype_glformat_unit_size(type,1);
+	n = (GLsizei)RSTRING_LEN(lists) / gltype_glformat_unit_size(type,1);
 	glCallLists(n, type, RSTRING_PTR(lists));
 	CHECK_GLERROR
 	return Qnil;
@@ -902,7 +902,7 @@ VALUE obj; \
 				rb_raise(rb_eArgError, "Pixel unpack buffer bound, but offset argument missing"); \
 			map = (GLenum)NUM2INT(args[0]); \
 			Check_Type(args[1],T_ARRAY); \
-			size = RARRAY_LEN(args[1]); \
+			size = (GLsizei)RARRAY_LEN(args[1]); \
 			values = ALLOC_N(_vartype_,size); \
 			_convert_(args[1],values,size); \
 			glPixelMap##_type_##v(map,size,values); \
@@ -946,8 +946,8 @@ VALUE obj;
 	y = (GLint)NUM2INT(args[1]);
 	width = (GLsizei)NUM2UINT(args[2]);
 	height = (GLsizei)NUM2UINT(args[3]);
-	format = NUM2INT(args[4]);
-	type = NUM2INT(args[5]);
+	format = (int)NUM2INT(args[4]);
+	type = (int)NUM2INT(args[5]);
 
 	switch(numargs) {
 		default:
@@ -1026,7 +1026,7 @@ VALUE obj,arg1; \
 	VALUE ary, ary2; \
 	int i,j; \
 	_type_ items[64];  \
-	pname = NUM2INT(arg1); \
+	pname = (GLenum)NUM2INT(arg1); \
 	switch(pname) { \
 	case GL_ACCUM_CLEAR_VALUE: \
 	case GL_BLEND_COLOR: \
@@ -1985,7 +1985,7 @@ VALUE obj,arg1;
 	VALUE ary;
 	int i;
 	ary = rb_Array(arg1);
-	size = RARRAY_LEN(ary);
+	size = (GLsizei)RARRAY_LEN(ary);
 	textures = ALLOC_N(GLuint,size);
 	residences = ALLOC_N(GLboolean,size);
 	ary2cuint(ary,textures,size);	
@@ -2016,7 +2016,7 @@ VALUE obj,arg1,arg2;
 	GLsizei size;
 	Check_Type(arg1,T_ARRAY);
 	Check_Type(arg2,T_ARRAY);
-	if ((size = RARRAY_LEN(arg1)) != RARRAY_LEN(arg2))
+	if ((size = (GLsizei)RARRAY_LEN(arg1)) != RARRAY_LEN(arg2))
 		rb_raise(rb_eArgError, "passed arrays must have the same length");
 	textures = ALLOC_N(GLuint,size);
 	priorities = ALLOC_N(GLclampf,size);

data/ext/gl/gl-1.4.c

@@ -102,8 +102,8 @@ VALUE obj,arg1,arg2,arg3;
 	GLsizei *ary2;
   int len1,len2;
 	LOAD_GL_FUNC(glMultiDrawArrays,"1.4")
-  len1 = RARRAY_LEN(arg2);
-  len2 = RARRAY_LEN(arg3);
+  len1 = (int)RARRAY_LEN(arg2);
+  len2 = (int)RARRAY_LEN(arg3);
 	if (len1!=len2)
 			rb_raise(rb_eArgError, "Passed arrays must have same length");
 	mode = (GLenum)NUM2INT(arg1);
@@ -142,14 +142,14 @@ VALUE obj;
 			type = (GLenum)NUM2INT(args[1]);
 			Check_Type(args[2],T_ARRAY);
 			ary = args[2];
-			size = RARRAY_LEN(ary);
+			size = (GLint)RARRAY_LEN(ary);
 			counts = ALLOC_N(GLsizei,size);
 			indices = ALLOC_N(GLvoid*,size);
 			for (i=0;i<size;i++) {
 				VALUE data;
 				data = pack_array_or_pass_string(type,RARRAY_PTR(ary)[i]);
 				indices[i] = RSTRING_PTR(data);
-				counts[i] = RSTRING_LEN(data);
+				counts[i] = (GLsizei)RSTRING_LEN(data);
 			}
 			fptr_glMultiDrawElements(mode,counts,type,indices,size);
 			xfree(counts);
@@ -165,12 +165,12 @@ VALUE obj;
 			if (RARRAY_LEN(args[2]) != RARRAY_LEN(args[3]))
 				rb_raise(rb_eArgError, "Count and indices offset array must have same length");
 
-			size = RARRAY_LEN(args[2]);
+			size = (GLint)RARRAY_LEN(args[2]);
 
 			counts = ALLOC_N(GLsizei,size);
 			indices = ALLOC_N(GLvoid*,size);
 			for (i=0;i<size;i++) {
-				counts[i] = NUM2INT(rb_ary_entry(args[2],i));
+				counts[i] = (GLsizei)NUM2INT(rb_ary_entry(args[2],i));
 				indices[i] = (GLvoid *) NUM2INT(rb_ary_entry(args[3],i));
 			}
 			fptr_glMultiDrawElements(mode,counts,type,indices,size);

data/ext/gl/gl-1.5.c

@@ -129,7 +129,7 @@ VALUE obj,arg1,arg2,arg3;
 	target = (GLenum)NUM2INT(arg1);
 	offset = (GLintptr)NUM2INT(arg2);
 	size = (GLsizeiptr)NUM2INT(arg3);
-	data = allocate_buffer_with_string(size);
+	data = allocate_buffer_with_string((int)size);
 	fptr_glGetBufferSubData(target,offset,size,(GLvoid *)RSTRING_PTR(data));
 	CHECK_GLERROR
 	return data;

data/ext/gl/gl-2.0.c

@@ -64,7 +64,7 @@ VALUE obj,arg1;
 	GLenum *buffers;
 	LOAD_GL_FUNC(glDrawBuffers,"2.0")
 	Check_Type(arg1,T_ARRAY); 
-	size = RARRAY_LEN(arg1);
+	size = (GLsizei)RARRAY_LEN(arg1);
 	buffers = ALLOC_N(GLenum,size);
 	ary2cuint(arg1,buffers,size);
 	fptr_glDrawBuffers(size,buffers);
@@ -413,7 +413,7 @@ VALUE obj,arg1,arg2;
 	shader = (GLuint)NUM2UINT(arg1);
 	Check_Type(arg2,T_STRING);
 	str = RSTRING_PTR(arg2);
-	length = RSTRING_LEN(arg2);
+	length = (GLint)RSTRING_LEN(arg2);
 	fptr_glShaderSource(shader,1,&str,&length);
 	CHECK_GLERROR
 	return Qnil;
@@ -430,7 +430,7 @@ VALUE obj,arg1,arg2; \
 	_type_ *value; \
 	LOAD_GL_FUNC(gl##_name_,"2.0") \
 	Check_Type(arg2,T_ARRAY); \
-	count = RARRAY_LEN(arg2); \
+	count = (GLsizei)RARRAY_LEN(arg2); \
 	if (count<=0 || (count % _size_) != 0) \
 		rb_raise(rb_eArgError, "Parameter array size must be multiplication of %i",_size_); \
 	location = (GLint)NUM2INT(arg1); \
@@ -464,7 +464,7 @@ VALUE obj,arg1,arg2,arg3; \
 	GLfloat *value;	\
 	LOAD_GL_FUNC(gl##_name_,"2.0") \
 	location = (GLint)NUM2INT(arg1); \
-	count = RARRAY_LEN(rb_funcall(rb_Array(arg3),rb_intern("flatten"),0)); \
+	count = (GLsizei)RARRAY_LEN(rb_funcall(rb_Array(arg3),rb_intern("flatten"),0)); \
 	transpose = (GLboolean)NUM2INT(arg2); \
 	value = ALLOC_N(GLfloat, count); \
 	ary2cmatfloatcount(arg3,value,_size_,_size_); \

data/ext/gl/gl-2.1.c

@@ -27,7 +27,7 @@ VALUE obj,arg1,arg2,arg3; \
 	GLfloat *value;	\
 	LOAD_GL_FUNC(glUniformMatrix##_x_##x##_y_##fv,"2.1") \
 	location = (GLint)NUM2INT(arg1); \
-	count = RARRAY_LEN(rb_funcall(rb_Array(arg3),rb_intern("flatten"),0)); \
+	count = (GLsizei)RARRAY_LEN(rb_funcall(rb_Array(arg3),rb_intern("flatten"),0)); \
 	transpose = (GLboolean)NUM2INT(arg2); \
 	value = ALLOC_N(GLfloat, count); \
 	ary2cmatfloatcount(arg3,value, _x_, _y_); \

data/ext/gl/gl-ext-arb.c

@@ -52,7 +52,7 @@ static VALUE gl_PointParameterfvARB(VALUE obj,VALUE arg1,VALUE arg2)
 	GLenum pname;
 	GLint size;
 	LOAD_GL_FUNC(glPointParameterfvARB,"GL_ARB_point_parameters")
-	pname = NUM2UINT(arg1);
+	pname = (GLenum)NUM2UINT(arg1);
 	Check_Type(arg2,T_ARRAY);
 	if (pname==GL_POINT_DISTANCE_ATTENUATION)
 		size = 3;
@@ -106,7 +106,7 @@ static VALUE gl_ProgramStringARB(VALUE obj,VALUE arg1,VALUE arg2,VALUE arg3)
 {
 	LOAD_GL_FUNC(glProgramStringARB,"GL_ARB_vertex_program")
 	Check_Type(arg3,T_STRING);
-	fptr_glProgramStringARB(NUM2INT(arg1),NUM2INT(arg2),RSTRING_LEN(arg3),RSTRING_PTR(arg3));
+	fptr_glProgramStringARB((GLenum)NUM2INT(arg1),(GLenum)NUM2INT(arg2),(GLsizei)RSTRING_LEN(arg3),RSTRING_PTR(arg3));
 	CHECK_GLERROR
 	return Qnil;
 }
@@ -116,9 +116,9 @@ static VALUE gl_GetProgramivARB(VALUE obj,VALUE arg1,VALUE arg2)
 {
 	GLint ret = 0;
 	LOAD_GL_FUNC(glGetProgramivARB,"GL_ARB_vertex_program")
-	fptr_glGetProgramivARB(NUM2INT(arg1),NUM2INT(arg2),&ret);
+	fptr_glGetProgramivARB((GLenum)NUM2INT(arg1),(GLenum)NUM2INT(arg2),&ret);
 	CHECK_GLERROR
-	return cond_GLBOOL2RUBY(NUM2INT(arg2),ret);
+	return cond_GLBOOL2RUBY((GLenum)NUM2INT(arg2),ret);
 }
 
 static void (APIENTRY * fptr_glGetProgramStringARB)(GLenum,GLenum,void *string);
@@ -131,14 +131,14 @@ static VALUE gl_GetProgramStringARB(VALUE obj,VALUE arg1,VALUE arg2)
 	LOAD_GL_FUNC(glGetProgramStringARB,"GL_ARB_vertex_program")
 	LOAD_GL_FUNC(glGetProgramivARB,"GL_ARB_vertex_program")
 
-	fptr_glGetProgramivARB(NUM2INT(arg1),GL_PROGRAM_LENGTH_ARB,&len);
+	fptr_glGetProgramivARB((GLenum)NUM2INT(arg1),GL_PROGRAM_LENGTH_ARB,&len);
 	CHECK_GLERROR
 	if (len<=0)
 		return rb_str_new2("");
 	
 	buffer = ALLOC_N(GLchar,len+1);
 	memset(buffer,0,sizeof(GLchar) * (len+1));
-		fptr_glGetProgramStringARB(NUM2INT(arg1),NUM2INT(arg2),buffer);
+		fptr_glGetProgramStringARB((GLenum)NUM2INT(arg1),(GLenum)NUM2INT(arg2),buffer);
 	ret_buffer = rb_str_new2(buffer);
 	xfree(buffer);
 
@@ -218,7 +218,7 @@ VALUE obj,arg1,arg2,arg3; \
 	_type_ cary[4]; \
 	LOAD_GL_FUNC(gl##_name_,_extension_) \
 	_conv_(arg3,cary,4); \
-	fptr_gl##_name_(NUM2UINT(arg1),NUM2UINT(arg2),cary); \
+	fptr_gl##_name_((GLenum)NUM2UINT(arg1),(GLuint)NUM2UINT(arg2),cary); \
 	CHECK_GLERROR \
 	return Qnil; \
 }
@@ -237,7 +237,7 @@ VALUE obj,arg1,arg2; \
 { \
 	_type_ cary[4] = {0.0,0.0,0.0,0.0}; \
 	LOAD_GL_FUNC(gl##_name_,_extension_) \
-	fptr_gl##_name_(NUM2UINT(arg1),NUM2UINT(arg2),cary); \
+	fptr_gl##_name_((GLenum)NUM2UINT(arg1),(GLuint)NUM2UINT(arg2),cary); \
 	RET_ARRAY_OR_SINGLE(4,RETCONV_##_type_,cary) \
 }
 
@@ -363,9 +363,9 @@ static VALUE gl_##_name_(VALUE obj,VALUE arg1,VALUE arg2) \
 { \
 	_type_ ret = 0; \
 	LOAD_GL_FUNC(gl##_name_,"GL_ARB_occlusion_query") \
-	fptr_gl##_name_(NUM2INT(arg1),NUM2INT(arg2),&ret); \
+	fptr_gl##_name_((GLuint)NUM2INT(arg1),(GLenum)NUM2INT(arg2),&ret); \
 	CHECK_GLERROR \
-	return _conv_(NUM2INT(arg2),ret); \
+	return _conv_((GLenum)NUM2INT(arg2),ret); \
 }
 
 GETQUERY_FUNC(GetQueryivARB,GLint,cond_GLBOOL2RUBY)
@@ -397,7 +397,7 @@ VALUE obj,arg1,arg2;
 	shader = (GLuint)NUM2UINT(arg1);
 	Check_Type(arg2,T_STRING);
 	str = RSTRING_PTR(arg2);
-	length = RSTRING_LEN(arg2);
+	length = (GLint)RSTRING_LEN(arg2);
 	fptr_glShaderSourceARB(shader,1,&str,&length);
 	CHECK_GLERROR
 	return Qnil;
@@ -423,7 +423,7 @@ VALUE obj,arg1,arg2; \
 	_type_ *value; \
 	LOAD_GL_FUNC(gl##_name_,"GL_ARB_shader_objects") \
 	Check_Type(arg2,T_ARRAY); \
-	count = RARRAY_LEN(arg2); \
+	count = (GLsizei)RARRAY_LEN(arg2); \
 	if (count<=0 || (count % _size_) != 0) \
 		rb_raise(rb_eArgError, "Parameter array size must be multiplication of %i",_size_); \
 	location = (GLint)NUM2INT(arg1); \
@@ -457,7 +457,7 @@ VALUE obj,arg1,arg2,arg3; \
 	GLfloat *value;	\
 	LOAD_GL_FUNC(gl##_name_,"GL_ARB_shader_objects") \
 	location = (GLint)NUM2INT(arg1); \
-	count = RARRAY_LEN(rb_funcall(rb_Array(arg3),rb_intern("flatten"),0)); \
+	count = (GLsizei)RARRAY_LEN(rb_funcall(rb_Array(arg3),rb_intern("flatten"),0)); \
 	transpose = (GLboolean)NUM2INT(arg2); \
 	value = ALLOC_N(GLfloat, count); \
 	ary2cmatfloatcount(arg3,value,_size_,_size_); \

data/ext/gl/gl-ext-ati.c

@@ -25,7 +25,7 @@ static VALUE gl_DrawBuffersATI(VALUE obj,VALUE arg1)
 	GLenum *buffers;
 	LOAD_GL_FUNC(glDrawBuffersATI,"GL_ATI_draw_buffers")
 	Check_Type(arg1,T_ARRAY); 
-	size = RARRAY_LEN(arg1);
+	size = (GLsizei)RARRAY_LEN(arg1);
 	buffers = ALLOC_N(GLenum,size);
 	ary2cuint(arg1,buffers,size);
 	fptr_glDrawBuffersATI(size,buffers);

data/ext/gl/gl-ext-ext.c

@@ -41,7 +41,7 @@ VALUE obj,arg1,arg2;
 	LOAD_GL_FUNC(glPrioritizeTexturesEXT,"GL_EXT_texture_object")
 	Check_Type(arg1,T_ARRAY);
 	Check_Type(arg2,T_ARRAY);
-	if ((size = RARRAY_LEN(arg1)) != RARRAY_LEN(arg2))
+	if ((size = (GLsizei)RARRAY_LEN(arg1)) != (GLsizei)RARRAY_LEN(arg2))
 		rb_raise(rb_eArgError, "passed arrays must have the same length");
 	textures = ALLOC_N(GLuint,size);
 	priorities = ALLOC_N(GLclampf,size);
@@ -68,7 +68,7 @@ VALUE obj,arg1;
 	int i;
 	LOAD_GL_FUNC(glAreTexturesResidentEXT,"GL_EXT_texture_object")
 	ary = rb_Array(arg1);
-	size = RARRAY_LEN(ary);
+	size = (GLsizei)RARRAY_LEN(ary);
 	textures = ALLOC_N(GLuint,size);
 	residences = ALLOC_N(GLboolean,size);
 	ary2cuint(ary,textures,size);	
@@ -102,7 +102,7 @@ static VALUE gl_PointParameterfvEXT(VALUE obj,VALUE arg1,VALUE arg2)
 	GLenum pname;
 	GLint size;
 	LOAD_GL_FUNC(glPointParameterfvEXT,"GL_EXT_point_parameters")
-	pname = NUM2UINT(arg1);
+	pname = (GLenum)NUM2UINT(arg1);
 	Check_Type(arg2,T_ARRAY);
 	if (pname==GL_POINT_DISTANCE_ATTENUATION)
 		size = 3;
@@ -215,7 +215,7 @@ VALUE obj,arg1,arg2,arg3;
 	GLenum mode;
 	GLint *ary1;
 	GLsizei *ary2;
-  int len1,len2;
+  long len1,len2;
 	LOAD_GL_FUNC(glMultiDrawArraysEXT,"GL_EXT_multi_draw_arrays")
   len1 = RARRAY_LEN(arg2);
   len2 = RARRAY_LEN(arg3);
@@ -226,7 +226,7 @@ VALUE obj,arg1,arg2,arg3;
 	ary2 = ALLOC_N(GLsizei,len2);
 	ary2cint(arg2,ary1,len1);
 	ary2cint(arg3,ary2,len2);
-	fptr_glMultiDrawArraysEXT(mode,ary1,ary2,len1);
+	fptr_glMultiDrawArraysEXT(mode,ary1,ary2,(GLsizei)len1);
 	xfree(ary1);
 	xfree(ary2);
 	CHECK_GLERROR
@@ -257,7 +257,7 @@ VALUE obj;
 			type = (GLenum)NUM2INT(args[1]);
 			Check_Type(args[2],T_ARRAY);
 			ary = args[2];
-			size = RARRAY_LEN(ary);
+			size = (GLint)RARRAY_LEN(ary);
 			counts = ALLOC_N(GLsizei,size);
 			indices = ALLOC_N(GLvoid*,size);
 			for (i=0;i<size;i++) {
@@ -265,7 +265,7 @@ VALUE obj;
 				data = pack_array_or_pass_string(type,RARRAY_PTR(ary)[i]);
 
 				indices[i] = RSTRING_PTR(data);
-				counts[i] = RSTRING_LEN(data);
+				counts[i] = (GLsizei)RSTRING_LEN(data);
 			}
 			fptr_glMultiDrawElementsEXT(mode,counts,type,indices,size);
 			xfree(counts);
@@ -281,12 +281,12 @@ VALUE obj;
 			if (RARRAY_LEN(args[2]) != RARRAY_LEN(args[3]))
 				rb_raise(rb_eArgError, "Count and indices offset array must have same length");
 
-			size = RARRAY_LEN(args[2]);
+			size = (GLint)RARRAY_LEN(args[2]);
 
 			counts = ALLOC_N(GLsizei,size);
 			indices = ALLOC_N(GLvoid*,size);
 			for (i=0;i<size;i++) {
-				counts[i] = NUM2INT(rb_ary_entry(args[2],i));
+				counts[i] = (GLsizei)NUM2INT(rb_ary_entry(args[2],i));
 				indices[i] = (GLvoid *) NUM2INT(rb_ary_entry(args[3],i));
 			}
 			fptr_glMultiDrawElementsEXT(mode,counts,type,indices,size);
@@ -367,7 +367,7 @@ static VALUE gl_GetRenderbufferParameterivEXT(VALUE obj,VALUE arg1,VALUE arg2)
 {
 	GLint param = 0;
 	LOAD_GL_FUNC(glGetRenderbufferParameterivEXT,"GL_EXT_framebuffer_object")
-	fptr_glGetRenderbufferParameterivEXT(NUM2UINT(arg1),NUM2UINT(arg2),&param);
+	fptr_glGetRenderbufferParameterivEXT((GLenum)NUM2UINT(arg1),(GLenum)NUM2UINT(arg2),&param);
 	CHECK_GLERROR
 	return INT2NUM(param);
 }
@@ -388,9 +388,9 @@ static VALUE gl_GetFramebufferAttachmentParameterivEXT(VALUE obj,VALUE arg1, VAL
 {
 	GLint ret = 0;
 	LOAD_GL_FUNC(glGetFramebufferAttachmentParameterivEXT,"GL_EXT_framebuffer_object")
-	fptr_glGetFramebufferAttachmentParameterivEXT(NUM2UINT(arg1),NUM2UINT(arg2),NUM2UINT(arg3),&ret);
+	fptr_glGetFramebufferAttachmentParameterivEXT((GLenum)NUM2UINT(arg1),(GLenum)NUM2UINT(arg2),(GLenum)NUM2UINT(arg3),&ret);
 	CHECK_GLERROR
-	return cond_GLBOOL2RUBY(NUM2UINT(arg3),ret);
+	return cond_GLBOOL2RUBY((GLenum)NUM2UINT(arg3),ret);
 }
 
 GL_FUNC_LOAD_1(GenerateMipmapEXT,GLvoid, GLenum, "GL_EXT_framebuffer_object")
@@ -412,9 +412,9 @@ static VALUE gl_##_name_(VALUE obj,VALUE arg1,VALUE arg2) \
 { \
 	_type_ ret = 0; \
 	LOAD_GL_FUNC(gl##_name_,"GL_EXT_timer_query") \
-	fptr_gl##_name_(NUM2INT(arg1),NUM2INT(arg2),&ret); \
+	fptr_gl##_name_((GLuint)NUM2INT(arg1),(GLenum)NUM2INT(arg2),&ret); \
 	CHECK_GLERROR \
-	return _conv_(NUM2INT(arg2),ret); \
+	return _conv_((GLenum)NUM2INT(arg2),ret); \
 }
 
 GETQUERY_FUNC(GetQueryObjecti64vEXT,GLint64EXT,cond_GLBOOL2RUBY_LL)
@@ -430,14 +430,14 @@ gl_##_name_(obj,arg1,arg2,arg3) \
 VALUE obj,arg1,arg2,arg3; \
 { \
 	_type_ *cary; \
-	int len; \
+	long len; \
 	LOAD_GL_FUNC(gl##_name_,_extension_) \
 	len = RARRAY_LEN(rb_Array(arg3)); \
 	if (len<=0 || (len % 4) != 0) \
 		rb_raise(rb_eArgError, "Parameter array size must be multiplication of 4"); \
 	cary = ALLOC_N(_type_,len); \
 	_conv_(arg3,cary,len); \
-	fptr_gl##_name_(NUM2UINT(arg1),NUM2UINT(arg2),len / 4, cary); \
+	fptr_gl##_name_((GLenum)NUM2UINT(arg1),(GLuint)NUM2UINT(arg2),len / 4, cary); \
 	xfree(cary); \
 	CHECK_GLERROR \
 	return Qnil; \
@@ -469,7 +469,7 @@ VALUE obj,arg1,arg2; \
 	_type_ value[_size_]; \
 	LOAD_GL_FUNC(gl##_name_,"GL_ARB_shader_objects") \
 	_conv_(arg2,value,_size_); \
-	fptr_gl##_name_(NUM2UINT(arg1),value); \
+	fptr_gl##_name_((GLuint)NUM2UINT(arg1),value); \
 	CHECK_GLERROR \
 	return Qnil; \
 }
@@ -563,7 +563,7 @@ VALUE obj,arg1,arg2; \
 	_type_ *value; \
 	LOAD_GL_FUNC(gl##_name_,"GL_EXT_gpu_shader4") \
 	Check_Type(arg2,T_ARRAY); \
-	count = RARRAY_LEN(arg2); \
+	count = (GLsizei)RARRAY_LEN(arg2); \
 	if (count<=0 || (count % _size_) != 0) \
 		rb_raise(rb_eArgError, "Parameter array size must be multiplication of %i",_size_); \
 	location = (GLint)NUM2INT(arg1); \
@@ -620,7 +620,7 @@ static VALUE gl_BindFragDataLocationEXT(VALUE obj,VALUE arg1,VALUE arg2,VALUE ar
 {
 	LOAD_GL_FUNC(glBindFragDataLocationEXT,"GL_EXT_gpu_shader4")
 	Check_Type(arg3,T_STRING);
-	fptr_glBindFragDataLocationEXT(NUM2UINT(arg1),NUM2UINT(arg2),RSTRING_PTR(arg3));
+	fptr_glBindFragDataLocationEXT((GLuint)NUM2UINT(arg1),(GLuint)NUM2UINT(arg2),RSTRING_PTR(arg3));
 	CHECK_GLERROR
 	return Qnil;
 }
@@ -631,7 +631,7 @@ static VALUE gl_GetFragDataLocationEXT(VALUE obj,VALUE arg1,VALUE arg2)
 	GLint ret;
 	LOAD_GL_FUNC(glGetFragDataLocationEXT,"GL_EXT_gpu_shader4")
 	Check_Type(arg2,T_STRING);
-	ret = fptr_glGetFragDataLocationEXT(NUM2UINT(arg1),RSTRING_PTR(arg2));
+	ret = fptr_glGetFragDataLocationEXT((GLuint)NUM2UINT(arg1),RSTRING_PTR(arg2));
 	CHECK_GLERROR
 	return INT2NUM(ret);
 }