ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/Deliantra-Client/Client.xs
(Generate patch)

Comparing deliantra/Deliantra-Client/Client.xs (file contents):
Revision 1.297 by root, Tue Dec 22 00:08:11 2009 UTC vs.
Revision 1.309 by root, Mon Dec 26 22:30:21 2011 UTC

41#include <SDL_opengl.h> 41#include <SDL_opengl.h>
42 42
43/* work around os x broken headers */ 43/* work around os x broken headers */
44#ifdef __MACOSX__ 44#ifdef __MACOSX__
45typedef void (APIENTRYP PFNGLBLENDFUNCSEPARATEPROC) (GLenum sfactorRGB, GLenum dfactorRGB, GLenum sfactorAlpha, GLenum dfactorAlpha); 45typedef void (APIENTRYP PFNGLBLENDFUNCSEPARATEPROC) (GLenum sfactorRGB, GLenum dfactorRGB, GLenum sfactorAlpha, GLenum dfactorAlpha);
46typedef void (APIENTRYP PFNGLACTIVETEXTUREPROC) (GLenum texture);
47typedef void (APIENTRYP PFNGLMULTITEXCOORD2FPROC) (GLenum target, GLfloat s, GLfloat t);
46#endif 48#endif
47 49
48#define PANGO_ENABLE_BACKEND 50#define PANGO_ENABLE_BACKEND
49#define G_DISABLE_CAST_CHECKS 51#define G_DISABLE_CAST_CHECKS
50 52
97 99
98#define KMOD_LRAM 0x10000 // our extension 100#define KMOD_LRAM 0x10000 // our extension
99 101
100#define TEXID_SPEECH 1 102#define TEXID_SPEECH 1
101#define TEXID_NOFACE 2 103#define TEXID_NOFACE 2
104
105static char *
106fast_sv_grow (SV *sv, STRLEN need)
107{
108 STRLEN len = SvLEN (sv);
109 STRLEN want = SvCUR (sv) + need;
110
111 if (expect_false (len < want))
112 {
113 do
114 len *= 2;
115 while (len < want);
116
117 sv_grow (sv, len);
118 }
119
120 SvCUR_set (sv, want);
121 return SvEND (sv) - need;
122}
102 123
103static AV *texture_av; 124static AV *texture_av;
104 125
105static struct 126static struct
106{ 127{
458 ev.code = 1; 479 ev.code = 1;
459 ev.data1 = (void *)(long)channel; 480 ev.data1 = (void *)(long)channel;
460 ev.data2 = 0; 481 ev.data2 = 0;
461 482
462 SDL_PushEvent ((SDL_Event *)&ev); 483 SDL_PushEvent ((SDL_Event *)&ev);
484}
485
486static unsigned int
487div255 (unsigned int n)
488{
489 return (n + (n >> 8)) >> 8;
463} 490}
464 491
465static unsigned int 492static unsigned int
466minpot (unsigned int n) 493minpot (unsigned int n)
467{ 494{
794 821
795 const_iv (FOW_DARKNESS) 822 const_iv (FOW_DARKNESS)
796# undef const_iv 823# undef const_iv
797 }; 824 };
798 825
799 for (civ = const_iv + sizeof (const_iv) / sizeof (const_iv [0]); civ-- > const_iv; ) 826 for (civ = const_iv + sizeof (const_iv) / sizeof (const_iv [0]); civ > const_iv; civ--)
800 newCONSTSUB (stash, (char *)civ->name, newSViv (civ->iv)); 827 newCONSTSUB (stash, (char *)civ[-1].name, newSViv (civ[-1].iv));
801 828
802 assert (SDLK_MODIFIER_MIN == SDLK_NUMLOCK); 829 assert (SDLK_MODIFIER_MIN == SDLK_NUMLOCK);
803 assert (SDLK_MODIFIER_MAX == SDLK_COMPOSE); 830 assert (SDLK_MODIFIER_MAX == SDLK_COMPOSE);
804} 831}
805 832
928 955
929 SDL_WM_SetCaption ("Deliantra MORPG Client " VERSION, "Deliantra"); 956 SDL_WM_SetCaption ("Deliantra MORPG Client " VERSION, "Deliantra");
930#define GL_FUNC(ptr,name) gl.name = (ptr)SDL_GL_GetProcAddress ("gl" # name); 957#define GL_FUNC(ptr,name) gl.name = (ptr)SDL_GL_GetProcAddress ("gl" # name);
931#include "glfunc.h" 958#include "glfunc.h"
932#undef GL_FUNC 959#undef GL_FUNC
960
961 if (!gl.ActiveTexture ) gl.ActiveTexture = gl.ActiveTextureARB;
962 if (!gl.MultiTexCoord2f) gl.MultiTexCoord2f = gl.MultiTexCoord2fARB;
933 } 963 }
934} 964}
935 OUTPUT: 965 OUTPUT:
936 RETVAL 966 RETVAL
937 967
1022 1052
1023 XPUSHs (sv_2mortal (sv_bless (newRV_noinc ((SV *)hv), gv_stashpv ("DC::UI::Event", 1)))); 1053 XPUSHs (sv_2mortal (sv_bless (newRV_noinc ((SV *)hv), gv_stashpv ("DC::UI::Event", 1))));
1024 } 1054 }
1025} 1055}
1026 1056
1057char *
1058SDL_AudioDriverName ()
1059 CODE:
1060{
1061 char buf [256];
1062 if (!SDL_AudioDriverName (buf, sizeof (buf)))
1063 XSRETURN_UNDEF;
1064
1065 RETVAL = buf;
1066}
1067 OUTPUT:
1068 RETVAL
1069
1027int 1070int
1028Mix_OpenAudio (int frequency = 44100, int format = MIX_DEFAULT_FORMAT, int channels = 2, int chunksize = 4096) 1071Mix_OpenAudio (int frequency = 44100, int format = MIX_DEFAULT_FORMAT, int channels = 2, int chunksize = 4096)
1029 POSTCALL: 1072 POSTCALL:
1030 Mix_HookMusicFinished (music_finished); 1073 Mix_HookMusicFinished (music_finished);
1031 Mix_ChannelFinished (channel_finished); 1074 Mix_ChannelFinished (channel_finished);
1093add_font (char *file) 1136add_font (char *file)
1094 CODE: 1137 CODE:
1095 RETVAL = FcConfigAppFontAddFile (0, (const FcChar8 *)file); 1138 RETVAL = FcConfigAppFontAddFile (0, (const FcChar8 *)file);
1096 OUTPUT: 1139 OUTPUT:
1097 RETVAL 1140 RETVAL
1141
1142void
1143IMG_Init (int flags = IMG_INIT_JPG | IMG_INIT_PNG)
1144
1145void
1146Mix_Init (int flags = MIX_INIT_MOD | MIX_INIT_MP3 | MIX_INIT_OGG)
1098 1147
1099void 1148void
1100load_image_inline (SV *image_) 1149load_image_inline (SV *image_)
1101 ALIAS: 1150 ALIAS:
1102 load_image_file = 1 1151 load_image_file = 1
1670void 1719void
1671draw_fow_texture (float intensity, int hidden_tex, int name1, uint8_t *data1, float s, float t, int w, int h, float blend = 0.f, int dx = 0, int dy = 0, int name2 = 0, uint8_t *data2 = data1) 1720draw_fow_texture (float intensity, int hidden_tex, int name1, uint8_t *data1, float s, float t, int w, int h, float blend = 0.f, int dx = 0, int dy = 0, int name2 = 0, uint8_t *data2 = data1)
1672 PROTOTYPE: @ 1721 PROTOTYPE: @
1673 CODE: 1722 CODE:
1674{ 1723{
1724 glEnable (GL_BLEND);
1725 glBlendFunc (intensity ? GL_SRC_ALPHA : GL_ONE, GL_ONE_MINUS_SRC_ALPHA);
1675 glEnable (GL_TEXTURE_2D); 1726 glEnable (GL_TEXTURE_2D);
1676 glEnable (GL_BLEND);
1677 glBlendFunc (GL_ONE, GL_ONE_MINUS_SRC_ALPHA);
1678 glBindTexture (GL_TEXTURE_2D, name1); 1727 glBindTexture (GL_TEXTURE_2D, name1);
1679 1728
1680 glColor3f (intensity, intensity, intensity); 1729 glColor3f (intensity, intensity, intensity);
1681 glPushMatrix (); 1730 glPushMatrix ();
1682 glScalef (1./3, 1./3, 1.); 1731 glScalef (1./3, 1./3, 1.);
1697 glBindTexture (GL_TEXTURE_2D, name2); 1746 glBindTexture (GL_TEXTURE_2D, name2);
1698 glTexEnvi (GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_COMBINE); 1747 glTexEnvi (GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_COMBINE);
1699 1748
1700 /* rgb == rgb(glcolor) */ 1749 /* rgb == rgb(glcolor) */
1701 glTexEnvi (GL_TEXTURE_ENV, GL_COMBINE_RGB, GL_REPLACE); 1750 glTexEnvi (GL_TEXTURE_ENV, GL_COMBINE_RGB, GL_REPLACE);
1702 glTexEnvi (GL_TEXTURE_ENV, GL_SOURCE0_RGB, GL_CONSTANT); 1751 glTexEnvi (GL_TEXTURE_ENV, GL_SOURCE0_RGB, GL_PRIMARY_COLOR);
1703 glTexEnvi (GL_TEXTURE_ENV, GL_OPERAND0_RGB, GL_SRC_COLOR); 1752 glTexEnvi (GL_TEXTURE_ENV, GL_OPERAND0_RGB, GL_SRC_COLOR);
1704 1753
1705 /* alpha = interpolate t0, t1 by env_alpha */ 1754 /* alpha = interpolate t0, t1 by env_alpha */
1706 glTexEnvfv (GL_TEXTURE_ENV, GL_TEXTURE_ENV_COLOR, env_color); 1755 glTexEnvfv (GL_TEXTURE_ENV, GL_TEXTURE_ENV_COLOR, env_color);
1707 1756
2094 ? self->row + y 2143 ? self->row + y
2095 : 0; 2144 : 0;
2096 2145
2097 for (x = x0; x < x1; x++) 2146 for (x = x0; x < x1; x++)
2098 { 2147 {
2099 int r = 32, g = 32, b = 32, a = 192; 2148 unsigned int r = 32, g = 32, b = 32, a = 192;
2100 2149
2101 if (row && row->c0 <= x && x < row->c1) 2150 if (row && row->c0 <= x && x < row->c1)
2102 { 2151 {
2103 mapcell *cell = row->col + (x - row->c0); 2152 mapcell *cell = row->col + (x - row->c0);
2104 2153
2106 { 2155 {
2107 maptex tex = self->tex [cell->tile [z]]; 2156 maptex tex = self->tex [cell->tile [z]];
2108 int a0 = 255 - tex.a; 2157 int a0 = 255 - tex.a;
2109 int a1 = tex.a; 2158 int a1 = tex.a;
2110 2159
2111 r = (r * a0 + tex.r * a1) / 255; 2160 r = div255 (r * a0 + tex.r * a1);
2112 g = (g * a0 + tex.g * a1) / 255; 2161 g = div255 (g * a0 + tex.g * a1);
2113 b = (b * a0 + tex.b * a1) / 255; 2162 b = div255 (b * a0 + tex.b * a1);
2114 a = (a * a0 + tex.a * a1) / 255; 2163 a = div255 (a * a0 + tex.a * a1);
2115 } 2164 }
2116 } 2165 }
2117 2166
2118 *map++ = (r ) 2167 *map++ = (r )
2119 | (g << 8) 2168 | (g << 8)
2126} 2175}
2127 OUTPUT: 2176 OUTPUT:
2128 RETVAL 2177 RETVAL
2129 2178
2130void 2179void
2131draw (DC::Map self, int mx, int my, int sw, int sh, int T, U32 player = 0xffffffff, int sdx = 0, int sdy = 0) 2180draw (DC::Map self, int mx, int my, int sw, int sh, int Tw, int Th, U32 player = 0xffffffff, int sdx = 0, int sdy = 0)
2132 CODE: 2181 CODE:
2133{ 2182{
2134 int x, y, z; 2183 int x, y, z;
2135 2184
2136 HV *smooth = (HV *)sv_2mortal ((SV *)newHV ()); 2185 HV *smooth = (HV *)sv_2mortal ((SV *)newHV ());
2220 2269
2221 key.texname = tex.name; 2270 key.texname = tex.name;
2222 arr = rc_array (rc, &key); 2271 arr = rc_array (rc, &key);
2223 } 2272 }
2224 2273
2225 px = (x + 1) * T - tex.w; 2274 px = (x + 1) * Th - tex.w;
2226 py = (y + 1) * T - tex.h; 2275 py = (y + 1) * Tw - tex.h;
2227 2276
2228 if (expect_false (cell->player == player) && expect_false (z == 2)) 2277 if (expect_false (cell->player == player) && expect_false (z == 2))
2229 { 2278 {
2230 pl_x = px; 2279 pl_x = px;
2231 pl_y = py; 2280 pl_y = py;
2284 if (cell->flags & 1) 2333 if (cell->flags & 1)
2285 { 2334 {
2286 rc_key_t key_ov = key; 2335 rc_key_t key_ov = key;
2287 maptex tex = self->tex [TEXID_SPEECH]; 2336 maptex tex = self->tex [TEXID_SPEECH];
2288 rc_array_t *arr; 2337 rc_array_t *arr;
2289 int px = x * T + T * 2 / 32; 2338 int px = x * Tw + Tw * 2 / 32;
2290 int py = y * T - T * 6 / 32; 2339 int py = y * Th - Th * 6 / 32;
2291 2340
2292 key_ov.texname = tex.name; 2341 key_ov.texname = tex.name;
2293 arr = rc_array (rc_ov, &key_ov); 2342 arr = rc_array (rc_ov, &key_ov);
2294 2343
2295 rc_t2f_v3f (arr, 0 , 0 , px , py , 0); 2344 rc_t2f_v3f (arr, 0 , 0 , px , py , 0);
2296 rc_t2f_v3f (arr, 0 , tex.t, px , py + T, 0); 2345 rc_t2f_v3f (arr, 0 , tex.t, px , py + Th, 0);
2297 rc_t2f_v3f (arr, tex.s, tex.t, px + T, py + T, 0); 2346 rc_t2f_v3f (arr, tex.s, tex.t, px + Tw, py + Th, 0);
2298 rc_t2f_v3f (arr, tex.s, 0 , px + T, py , 0); 2347 rc_t2f_v3f (arr, tex.s, 0 , px + Tw, py , 0);
2299 } 2348 }
2300 } 2349 }
2301 } 2350 }
2302 } 2351 }
2303 2352
2330 if (!(bits & 0x1000) 2379 if (!(bits & 0x1000)
2331 && skey->level == level 2380 && skey->level == level
2332 && level > smooth_max [skey->x][skey->y]) 2381 && level > smooth_max [skey->x][skey->y])
2333 { 2382 {
2334 maptex tex = self->tex [skey->tile]; 2383 maptex tex = self->tex [skey->tile];
2335 int px = (((int)skey->x) - 1) * T; 2384 int px = (((int)skey->x) - 1) * Tw;
2336 int py = (((int)skey->y) - 1) * T; 2385 int py = (((int)skey->y) - 1) * Th;
2337 int border = bits & 15; 2386 int border = bits & 15;
2338 int corner = (bits >> 8) & ~(bits >> 4) & 15; 2387 int corner = (bits >> 8) & ~(bits >> 4) & 15;
2339 float dx = tex.s * .0625f; // 16 images/row 2388 float dx = tex.s * .0625f; // 16 images/row
2340 float dy = tex.t * .5f ; // 2 images/column 2389 float dy = tex.t * .5f ; // 2 images/column
2341 2390
2354 2403
2355 if (border) 2404 if (border)
2356 { 2405 {
2357 float ox = border * dx; 2406 float ox = border * dx;
2358 2407
2359 glTexCoord2f (ox , 0.f ); glVertex2i (px , py ); 2408 glTexCoord2f (ox , 0.f ); glVertex2i (px , py );
2360 glTexCoord2f (ox , dy ); glVertex2i (px , py + T); 2409 glTexCoord2f (ox , dy ); glVertex2i (px , py + Th);
2361 glTexCoord2f (ox + dx, dy ); glVertex2i (px + T, py + T); 2410 glTexCoord2f (ox + dx, dy ); glVertex2i (px + Tw, py + Th);
2362 glTexCoord2f (ox + dx, 0.f ); glVertex2i (px + T, py ); 2411 glTexCoord2f (ox + dx, 0.f ); glVertex2i (px + Tw, py );
2363 } 2412 }
2364 2413
2365 if (corner) 2414 if (corner)
2366 { 2415 {
2367 float ox = corner * dx; 2416 float ox = corner * dx;
2368 2417
2369 glTexCoord2f (ox , dy ); glVertex2i (px , py ); 2418 glTexCoord2f (ox , dy ); glVertex2i (px , py );
2370 glTexCoord2f (ox , dy * 2.f); glVertex2i (px , py + T); 2419 glTexCoord2f (ox , dy * 2.f); glVertex2i (px , py + Th);
2371 glTexCoord2f (ox + dx, dy * 2.f); glVertex2i (px + T, py + T); 2420 glTexCoord2f (ox + dx, dy * 2.f); glVertex2i (px + Tw, py + Th);
2372 glTexCoord2f (ox + dx, dy ); glVertex2i (px + T, py ); 2421 glTexCoord2f (ox + dx, dy ); glVertex2i (px + Tw, py );
2373 } 2422 }
2374 } 2423 }
2375 } 2424 }
2376 } 2425 }
2377 } 2426 }
2418 for (x = 0; x < sw; x++) 2467 for (x = 0; x < sw; x++)
2419 if (row->c0 <= x + mx && x + mx < row->c1) 2468 if (row->c0 <= x + mx && x + mx < row->c1)
2420 { 2469 {
2421 mapcell *cell = row->col + (x + mx - row->c0); 2470 mapcell *cell = row->col + (x + mx - row->c0);
2422 2471
2423 int px = x * T; 2472 int px = x * Tw;
2424 int py = y * T; 2473 int py = y * Th;
2425 2474
2426 if (expect_false (cell->player == player)) 2475 if (expect_false (cell->player == player))
2427 { 2476 {
2428 px += sdx; 2477 px += sdx;
2429 py += sdy; 2478 py += sdy;
2430 } 2479 }
2431 2480
2432 if (cell->stat_hp) 2481 if (cell->stat_hp)
2433 { 2482 {
2434 int width = cell->stat_width * T; 2483 int width = cell->stat_width * Tw;
2435 int thick = (sh * T / 32 + 27) / 28 + 1 + cell->stat_width; 2484 int thick = (sh * Th / 32 + 27) / 28 + 1 + cell->stat_width;
2436 2485
2437 glColor3ub (0, 0, 0); 2486 glColor3ub (0, 0, 0);
2438 glRectf (px + 1, py - thick - 2, 2487 glRectf (px + 1, py - thick - 2,
2439 px + width - 1, py); 2488 px + width - 1, py);
2440 2489
2520 int x, y; 2569 int x, y;
2521 int sw1 = sw + 2; 2570 int sw1 = sw + 2;
2522 int sh1 = sh + 2; 2571 int sh1 = sh + 2;
2523 int sh3 = sh * 3; 2572 int sh3 = sh * 3;
2524 int sw3 = sw * 3; 2573 int sw3 = sw * 3;
2525 uint8_t *darkness1 = (uint8_t *)malloc (sw1 * sh1);
2526 SV *darkness3_sv = sv_2mortal (newSV (sw3 * sh3)); 2574 SV *darkness3_sv = sv_2mortal (newSV (sw3 * sh3));
2527 uint8_t *darkness3 = (uint8_t *)SvPVX (darkness3_sv); 2575 uint8_t *darkness3 = (uint8_t *)SvPVX (darkness3_sv);
2576 uint8_t *darkness1 = (uint8_t *)malloc (sw1 * sh1);
2577 memset (darkness1, 0, sw1*sh1);
2528 2578
2529 SvPOK_only (darkness3_sv); 2579 SvPOK_only (darkness3_sv);
2530 SvCUR_set (darkness3_sv, sw3 * sh3); 2580 SvCUR_set (darkness3_sv, sw3 * sh3);
2531 2581
2532 mx += self->x - 1; 2582 mx += self->x - 1;
2793 if (RETVAL < 0) 2843 if (RETVAL < 0)
2794 { 2844 {
2795 RETVAL = Mix_GroupOldest (-1); 2845 RETVAL = Mix_GroupOldest (-1);
2796 2846
2797 if (RETVAL < 0) 2847 if (RETVAL < 0)
2848 {
2849 // happens sometimes, maybe it just stopped playing(?)
2850 RETVAL = Mix_GroupAvailable (-1);
2851
2852 if (RETVAL < 0)
2798 XSRETURN_UNDEF; 2853 XSRETURN_UNDEF;
2799 2854 }
2855 else
2800 Mix_HaltChannel (RETVAL); 2856 Mix_HaltChannel (RETVAL);
2801 } 2857 }
2802 2858
2803 Mix_UnregisterAllEffects (RETVAL); 2859 Mix_UnregisterAllEffects (RETVAL);
2804 Mix_Volume (RETVAL, 128); 2860 Mix_Volume (RETVAL, 128);
2805} 2861}
2864 Mix_SetReverseStereo (self, flip); 2920 Mix_SetReverseStereo (self, flip);
2865 2921
2866MODULE = Deliantra::Client PACKAGE = DC::MixChunk 2922MODULE = Deliantra::Client PACKAGE = DC::MixChunk
2867 2923
2868PROTOTYPES: DISABLE 2924PROTOTYPES: DISABLE
2925
2926void
2927decoders ()
2928 PPCODE:
2929#if SDL_MIXER_MAJOR_VERSION > 1 || SDL_MIXER_MINOR_VERSION > 2 || SDL_MIXER_PATCHLEVEL >= 10
2930 int i, num = Mix_GetNumChunkDecoders ();
2931 EXTEND (SP, num);
2932 for (i = 0; i < num; ++i)
2933 PUSHs (sv_2mortal (newSVpv (Mix_GetChunkDecoder (i), 0)));
2934#else
2935 XPUSHs (sv_2mortal (newSVpv ("(sdl mixer too old)", 0)));
2936#endif
2869 2937
2870DC::MixChunk 2938DC::MixChunk
2871new (SV *class, DC::RW rwops) 2939new (SV *class, DC::RW rwops)
2872 CODE: 2940 CODE:
2873 RETVAL = Mix_LoadWAV_RW (rwops, 1); 2941 RETVAL = Mix_LoadWAV_RW (rwops, 1);
2906 OUTPUT: 2974 OUTPUT:
2907 RETVAL 2975 RETVAL
2908 2976
2909MODULE = Deliantra::Client PACKAGE = DC::MixMusic 2977MODULE = Deliantra::Client PACKAGE = DC::MixMusic
2910 2978
2979void
2980decoders ()
2981 PPCODE:
2982#if SDL_MIXER_MAJOR_VERSION > 1 || SDL_MIXER_MINOR_VERSION > 2 || SDL_MIXER_PATCHLEVEL >= 10
2983 int i, num = Mix_GetNumMusicDecoders ();
2984 EXTEND (SP, num);
2985 for (i = 0; i < num; ++i)
2986 PUSHs (sv_2mortal (newSVpv (Mix_GetMusicDecoder (i), 0)));
2987#else
2988 XPUSHs (sv_2mortal (newSVpv ("(sdl mixer too old)", 0)));
2989#endif
2990
2911int 2991int
2912volume (int volume = -1) 2992volume (int volume = -1)
2913 PROTOTYPE: ;$ 2993 PROTOTYPE: ;$
2914 CODE: 2994 CODE:
2915 if (items > 0) 2995 if (items > 0)
2925 3005
2926void 3006void
2927halt () 3007halt ()
2928 CODE: 3008 CODE:
2929 Mix_HaltMusic (); 3009 Mix_HaltMusic ();
3010
3011int
3012playing ()
3013 CODE:
3014 RETVAL = Mix_PlayingMusic ();
3015 OUTPUT:
3016 RETVAL
2930 3017
2931DC::MixMusic 3018DC::MixMusic
2932new (SV *class, DC::RW rwops) 3019new (SV *class, DC::RW rwops)
2933 CODE: 3020 CODE:
2934 RETVAL = Mix_LoadMUS_RW (rwops); 3021 RETVAL = Mix_LoadMUS_RW (rwops);
3074 const_iv (GL_FUNC_SUBTRACT), 3161 const_iv (GL_FUNC_SUBTRACT),
3075 const_iv (GL_FUNC_REVERSE_SUBTRACT), 3162 const_iv (GL_FUNC_REVERSE_SUBTRACT),
3076# undef const_iv 3163# undef const_iv
3077 }; 3164 };
3078 3165
3079 for (civ = const_iv + sizeof (const_iv) / sizeof (const_iv [0]); civ-- > const_iv; ) 3166 for (civ = const_iv + sizeof (const_iv) / sizeof (const_iv [0]); civ > const_iv; civ--)
3080 newCONSTSUB (stash, (char *)civ->name, newSViv (civ->iv)); 3167 newCONSTSUB (stash, (char *)civ[-1].name, newSViv (civ[-1].iv));
3081 3168
3082 texture_av = newAV (); 3169 texture_av = newAV ();
3083 AvREAL_off (texture_av); 3170 AvREAL_off (texture_av);
3084} 3171}
3085 3172
3128 RETVAL 3215 RETVAL
3129 3216
3130int glGetError () 3217int glGetError ()
3131 3218
3132void glFinish () 3219void glFinish ()
3220
3221void glFlush ()
3133 3222
3134void glClear (int mask) 3223void glClear (int mask)
3135 3224
3136void glClearColor (float r, float g, float b, float a = 1.0) 3225void glClearColor (float r, float g, float b, float a = 1.0)
3137 PROTOTYPE: @ 3226 PROTOTYPE: @

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines