Update RingOpenGL 1.1 - Add Function (Source Code) : void glColor4s(GLshort red, GLshort green, GLshort blue, GLshort alpha)
@@ -3450,6 +3450,32 @@ RING_FUNC(ring_glColor4iv)
glColor4iv((GLint *) RING_API_GETCPOINTER(1,"GLint"));
}
+
+RING_FUNC(ring_glColor4s)
+{
+ if ( RING_API_PARACOUNT != 4 ) {
+ RING_API_ERROR(RING_API_MISS4PARA);
+ return ;
+ }
+ if ( ! RING_API_ISNUMBER(1) ) {
+ RING_API_ERROR(RING_API_BADPARATYPE);
+ return ;
+ }
+ if ( ! RING_API_ISNUMBER(2) ) {
+ RING_API_ERROR(RING_API_BADPARATYPE);
+ return ;
+ }
+ if ( ! RING_API_ISNUMBER(3) ) {
+ RING_API_ERROR(RING_API_BADPARATYPE);
+ return ;
+ }
+ if ( ! RING_API_ISNUMBER(4) ) {
+ RING_API_ERROR(RING_API_BADPARATYPE);
+ return ;
+ }
+ glColor4s( (GLshort ) RING_API_GETNUMBER(1), (GLshort ) RING_API_GETNUMBER(2), (GLshort ) RING_API_GETNUMBER(3), (GLshort ) RING_API_GETNUMBER(4));
+}
+
RING_API void ringlib_init(RingState *pRingState)
{
ring_vm_funcregister("glaccum",ring_glAccum);
@@ -3493,6 +3519,7 @@ RING_API void ringlib_init(RingState *pRingState)
ring_vm_funcregister("glcolor4fv",ring_glColor4fv);
ring_vm_funcregister("glcolor4i",ring_glColor4i);
ring_vm_funcregister("glcolor4iv",ring_glColor4iv);
+ ring_vm_funcregister("glcolor4s",ring_glColor4s);
ring_vm_funcregister("get_gl_zero",ring_get_gl_zero);
ring_vm_funcregister("get_gl_false",ring_get_gl_false);
ring_vm_funcregister("get_gl_logic_op",ring_get_gl_logic_op);
