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.199 by root, Tue Jul 17 13:53:02 2007 UTC vs.
Revision 1.207 by root, Fri Jul 20 18:19:45 2007 UTC

… …
26#include <string.h> 26#include <string.h>
27#include <stdio.h> 27#include <stdio.h>
28#include <stdlib.h> 28#include <stdlib.h>
29 29
30#include <SDL.h> 30#include <SDL.h>
31#include <SDL_thread.h>
31#include <SDL_endian.h> 32#include <SDL_endian.h>
32#include <SDL_image.h> 33#include <SDL_image.h>
33#include <SDL_mixer.h> 34#include <SDL_mixer.h>
34#include <SDL_opengl.h> 35#include <SDL_opengl.h>
35 36
… …
431} 432}
432 433
433/* SDL should provide this, really. */ 434/* SDL should provide this, really. */
434#define SDLK_MODIFIER_MIN 300 435#define SDLK_MODIFIER_MIN 300
435#define SDLK_MODIFIER_MAX 314 436#define SDLK_MODIFIER_MAX 314
437
438/******************************************************************************/
439
440static int
441within_widget (SV *widget, NV x, NV y)
442{
443 HV *self;
444 SV **svp;
445 NV wx, ww, wy, wh;
446
447 if (!SvROK (widget))
448 return 0;
449
450 self = (HV *)SvRV (widget);
451
452 if (SvTYPE (self) != SVt_PVHV)
453 return 0;
454
455 svp = hv_fetch (self, "y", 1, 0); wy = svp ? SvNV (*svp) : 0.;
456 if (y < wy)
457 return 0;
458
459 svp = hv_fetch (self, "h", 1, 0); wh = svp ? SvNV (*svp) : 0.;
460 if (y >= wy + wh)
461 return 0;
462
463 svp = hv_fetch (self, "x", 1, 0); wx = svp ? SvNV (*svp) : 0.;
464 if (x < wx)
465 return 0;
466
467 svp = hv_fetch (self, "w", 1, 0); ww = svp ? SvNV (*svp) : 0.;
468 if (x >= wx + ww)
469 return 0;
470
471 svp = hv_fetch (self, "can_events", sizeof ("can_events") - 1, 0);
472 if (!svp || !SvTRUE (*svp))
473 return 0;
474
475 return 1;
476}
436 477
437MODULE = CFPlus PACKAGE = CFPlus 478MODULE = CFPlus PACKAGE = CFPlus
438 479
439PROTOTYPES: ENABLE 480PROTOTYPES: ENABLE
440 481
… …
587 opengl_fontmap = pango_opengl_font_map_new (); 628 opengl_fontmap = pango_opengl_font_map_new ();
588 pango_opengl_font_map_set_default_substitute ((PangoOpenGLFontMap *)opengl_fontmap, substitute_func, 0, 0); 629 pango_opengl_font_map_set_default_substitute ((PangoOpenGLFontMap *)opengl_fontmap, substitute_func, 0, 0);
589 opengl_context = pango_opengl_font_map_create_context ((PangoOpenGLFontMap *)opengl_fontmap); 630 opengl_context = pango_opengl_font_map_create_context ((PangoOpenGLFontMap *)opengl_fontmap);
590} 631}
591 632
633char *
634SDL_GetError ()
635
592int 636int
593SDL_Init (U32 flags = SDL_INIT_VIDEO | SDL_INIT_AUDIO | PARACHUTE) 637SDL_Init (U32 flags = SDL_INIT_VIDEO | SDL_INIT_AUDIO | PARACHUTE)
594 638
595void 639void
596SDL_Quit () 640SDL_Quit ()
597 641
598void 642void
599SDL_ListModes () 643SDL_ListModes (int rgb, int alpha)
600 PPCODE: 644 PPCODE:
601{ 645{
602 SDL_Rect **m; 646 SDL_Rect **m;
603 647
604 SDL_GL_SetAttribute (SDL_GL_RED_SIZE, 5); 648 SDL_GL_SetAttribute (SDL_GL_RED_SIZE , rgb);
605 SDL_GL_SetAttribute (SDL_GL_GREEN_SIZE, 5); 649 SDL_GL_SetAttribute (SDL_GL_GREEN_SIZE, rgb);
606 SDL_GL_SetAttribute (SDL_GL_BLUE_SIZE, 5); 650 SDL_GL_SetAttribute (SDL_GL_BLUE_SIZE , rgb);
607 SDL_GL_SetAttribute (SDL_GL_ALPHA_SIZE, 1); 651 SDL_GL_SetAttribute (SDL_GL_ALPHA_SIZE, alpha);
608 652
609 SDL_GL_SetAttribute (SDL_GL_BUFFER_SIZE, 15); 653 SDL_GL_SetAttribute (SDL_GL_BUFFER_SIZE, 15);
610 SDL_GL_SetAttribute (SDL_GL_DEPTH_SIZE, 0); 654 SDL_GL_SetAttribute (SDL_GL_DEPTH_SIZE , 0);
611 655
612 SDL_GL_SetAttribute (SDL_GL_ACCUM_RED_SIZE, 0); 656 SDL_GL_SetAttribute (SDL_GL_ACCUM_RED_SIZE , 0);
613 SDL_GL_SetAttribute (SDL_GL_ACCUM_GREEN_SIZE, 0); 657 SDL_GL_SetAttribute (SDL_GL_ACCUM_GREEN_SIZE, 0);
614 SDL_GL_SetAttribute (SDL_GL_ACCUM_BLUE_SIZE, 0); 658 SDL_GL_SetAttribute (SDL_GL_ACCUM_BLUE_SIZE , 0);
615 SDL_GL_SetAttribute (SDL_GL_ACCUM_ALPHA_SIZE, 0); 659 SDL_GL_SetAttribute (SDL_GL_ACCUM_ALPHA_SIZE, 0);
616 660
617 SDL_GL_SetAttribute (SDL_GL_DOUBLEBUFFER, 1); 661 SDL_GL_SetAttribute (SDL_GL_DOUBLEBUFFER, 1);
618#if SDL_VERSION_ATLEAST(1,2,10) 662#if SDL_VERSION_ATLEAST(1,2,10)
619 SDL_GL_SetAttribute (SDL_GL_ACCELERATED_VISUAL, 1); 663 SDL_GL_SetAttribute (SDL_GL_ACCELERATED_VISUAL, 1);
620 SDL_GL_SetAttribute (SDL_GL_SWAP_CONTROL, 1); 664 SDL_GL_SetAttribute (SDL_GL_SWAP_CONTROL, 1);
621#endif 665#endif
622 666
623 SDL_EnableUNICODE (1);
624 SDL_EnableKeyRepeat (SDL_DEFAULT_REPEAT_DELAY, SDL_DEFAULT_REPEAT_INTERVAL);
625
626 m = SDL_ListModes (0, SDL_FULLSCREEN | SDL_OPENGL); 667 m = SDL_ListModes (0, SDL_FULLSCREEN | SDL_OPENGL);
627 668
628 if (m && m != (SDL_Rect **)-1) 669 if (m && m != (SDL_Rect **)-1)
629 while (*m) 670 while (*m)
630 { 671 {
672 if ((*m)->w >= 640 && (*m)->h >= 480)
673 {
631 AV *av = newAV (); 674 AV *av = newAV ();
632 av_push (av, newSViv ((*m)->w)); 675 av_push (av, newSViv ((*m)->w));
633 av_push (av, newSViv ((*m)->h)); 676 av_push (av, newSViv ((*m)->h));
677 av_push (av, newSViv (rgb));
678 av_push (av, newSViv (alpha));
634 XPUSHs (sv_2mortal (newRV_noinc ((SV *)av))); 679 XPUSHs (sv_2mortal (newRV_noinc ((SV *)av)));
680 }
635 681
636 ++m; 682 ++m;
637 } 683 }
638} 684}
639 685
640char *
641SDL_GetError ()
642
643int 686int
644SDL_SetVideoMode (int w, int h, int fullscreen) 687SDL_SetVideoMode (int w, int h, int rgb, int alpha, int fullscreen)
645 CODE: 688 CODE:
689{
690 SDL_EnableUNICODE (1);
691 SDL_EnableKeyRepeat (SDL_DEFAULT_REPEAT_DELAY, SDL_DEFAULT_REPEAT_INTERVAL);
692
693 SDL_GL_SetAttribute (SDL_GL_RED_SIZE , rgb);
694 SDL_GL_SetAttribute (SDL_GL_GREEN_SIZE, rgb);
695 SDL_GL_SetAttribute (SDL_GL_BLUE_SIZE , rgb);
696 SDL_GL_SetAttribute (SDL_GL_ALPHA_SIZE, alpha);
697
646 RETVAL = !!SDL_SetVideoMode ( 698 RETVAL = !!SDL_SetVideoMode (
647 w, h, 0, SDL_OPENGL | (fullscreen ? SDL_FULLSCREEN : 0) 699 w, h, 0, SDL_OPENGL | (fullscreen ? SDL_FULLSCREEN : 0)
648 ); 700 );
701
649 if (RETVAL) 702 if (RETVAL)
650 { 703 {
651 av_clear (texture_av); 704 av_clear (texture_av);
652 705
653 SDL_WM_SetCaption ("Crossfire+ Client " VERSION, "Crossfire+"); 706 SDL_WM_SetCaption ("Crossfire+ Client " VERSION, "Crossfire+");
654# define GL_FUNC(ptr,name) gl.name = (ptr)SDL_GL_GetProcAddress ("gl" # name); 707#define GL_FUNC(ptr,name) gl.name = (ptr)SDL_GL_GetProcAddress ("gl" # name);
655# include "glfunc.h" 708#include "glfunc.h"
656# undef GL_FUNC 709#undef GL_FUNC
657
658 } 710 }
711}
659 OUTPUT: 712 OUTPUT:
660 RETVAL 713 RETVAL
661 714
662void 715void
663SDL_GL_SwapBuffers () 716SDL_GL_SwapBuffers ()
… …
920#endif 973#endif
921} 974}
922 975
923MODULE = CFPlus PACKAGE = CFPlus::Font 976MODULE = CFPlus PACKAGE = CFPlus::Font
924 977
978PROTOTYPES: DISABLE
979
925CFPlus::Font 980CFPlus::Font
926new_from_file (SV *class, char *path, int id = 0) 981new_from_file (SV *class, char *path, int id = 0)
927 CODE: 982 CODE:
928{ 983{
929 int count; 984 int count;
… …
939 CODE: 994 CODE:
940 pango_font_description_free (self); 995 pango_font_description_free (self);
941 996
942void 997void
943make_default (CFPlus::Font self) 998make_default (CFPlus::Font self)
999 PROTOTYPE: $
944 CODE: 1000 CODE:
945 default_font = self; 1001 default_font = self;
946 1002
947MODULE = CFPlus PACKAGE = CFPlus::Layout 1003MODULE = CFPlus PACKAGE = CFPlus::Layout
948 1004
1005PROTOTYPES: DISABLE
1006
949void 1007void
950reset_glyph_cache () 1008reset_glyph_cache ()
1009 PROTOTYPE:
951 CODE: 1010 CODE:
952 tc_clear (); 1011 tc_clear ();
953 1012
954CFPlus::Layout 1013CFPlus::Layout
955new (SV *class) 1014new (SV *class)
… …
1242 flags 1301 flags
1243 ); 1302 );
1244 1303
1245MODULE = CFPlus PACKAGE = CFPlus::Texture 1304MODULE = CFPlus PACKAGE = CFPlus::Texture
1246 1305
1306PROTOTYPES: ENABLE
1307
1247int minpot (int n) 1308int minpot (int n)
1248 1309
1249void 1310void
1250pad2pot (SV *data_, SV *w_, SV *h_) 1311pad (SV *data_, int ow, int oh, int nw, int nh)
1251 CODE: 1312 CODE:
1252{ 1313{
1253 int ow = SvIV (w_); 1314 if ((nw != ow || nh != oh) && SvOK (data_))
1254 int oh = SvIV (h_);
1255
1256 if (ow && oh)
1257 { 1315 {
1258 int nw = minpot (ow);
1259 int nh = minpot (oh);
1260
1261 if (nw != ow || nh != oh)
1262 {
1263 if (SvOK (data_))
1264 {
1265 STRLEN datalen; 1316 STRLEN datalen;
1266 char *data = SvPVbyte (data_, datalen); 1317 char *data = SvPVbyte (data_, datalen);
1267 int bpp = datalen / (ow * oh); 1318 int bpp = datalen / (ow * oh);
1268 SV *result_ = sv_2mortal (newSV (nw * nh * bpp)); 1319 SV *result_ = sv_2mortal (newSV (nw * nh * bpp));
1269 1320
1270 SvPOK_only (result_); 1321 SvPOK_only (result_);
1271 SvCUR_set (result_, nw * nh * bpp); 1322 SvCUR_set (result_, nw * nh * bpp);
1272 1323
1273 memset (SvPVX (result_), 0, nw * nh * bpp); 1324 memset (SvPVX (result_), 0, nw * nh * bpp);
1274 while (oh--) 1325 while (oh--)
1275 memcpy (SvPVX (result_) + oh * nw * bpp, data + oh * ow * bpp, ow * bpp); 1326 memcpy (SvPVX (result_) + oh * nw * bpp, data + oh * ow * bpp, ow * bpp);
1276 1327
1277 sv_setsv (data_, result_); 1328 sv_setsv (data_, result_);
1278 }
1279
1280 sv_setiv (w_, nw);
1281 sv_setiv (h_, nh);
1282 }
1283 } 1329 }
1284} 1330}
1285 1331
1286void 1332void
1287draw_quad (SV *self, float x, float y, float w = 0., float h = 0.) 1333draw_quad (SV *self, float x, float y, float w = 0., float h = 0.)
… …
1342} 1388}
1343 OUTPUT: 1389 OUTPUT:
1344 RETVAL 1390 RETVAL
1345 1391
1346MODULE = CFPlus PACKAGE = CFPlus::Map 1392MODULE = CFPlus PACKAGE = CFPlus::Map
1393
1394PROTOTYPES: DISABLE
1347 1395
1348CFPlus::Map 1396CFPlus::Map
1349new (SV *class) 1397new (SV *class)
1350 CODE: 1398 CODE:
1351 New (0, RETVAL, 1, struct map); 1399 New (0, RETVAL, 1, struct map);
… …
1966void 2014void
1967fow_texture (CFPlus::Map self, int mx, int my, int sw, int sh) 2015fow_texture (CFPlus::Map self, int mx, int my, int sw, int sh)
1968 PPCODE: 2016 PPCODE:
1969{ 2017{
1970 int x, y; 2018 int x, y;
2019 int sw1 = sw + 2;
2020 int sh1 = sh + 2;
2021 int sh3 = sh * 3;
1971 int sw4 = (sw + 3) & ~3; 2022 int sw34 = (sw * 3 + 3) & ~3;
2023 uint8_t *darkness1 = (uint8_t *)malloc (sw1 * sh1);
1972 SV *darkness_sv = sv_2mortal (newSV (sw4 * sh)); 2024 SV *darkness3_sv = sv_2mortal (newSV (sw34 * sh3));
1973 uint8_t *darkness = (uint8_t *)SvPVX (darkness_sv); 2025 uint8_t *darkness3 = (uint8_t *)SvPVX (darkness3_sv);
1974 2026
1975 memset (darkness, 255, sw4 * sh);
1976 SvPOK_only (darkness_sv); 2027 SvPOK_only (darkness3_sv);
1977 SvCUR_set (darkness_sv, sw4 * sh); 2028 SvCUR_set (darkness3_sv, sw34 * sh3);
1978 2029
1979 mx += self->x; 2030 mx += self->x - 1;
1980 my += self->y; 2031 my += self->y - 1;
1981 2032
2033 memset (darkness1, 255, sw1 * sh1);
2034
1982 for (y = 0; y < sh; y++) 2035 for (y = 0; y < sh1; y++)
1983 if (0 <= y + my && y + my < self->rows) 2036 if (0 <= y + my && y + my < self->rows)
1984 { 2037 {
1985 maprow *row = self->row + (y + my); 2038 maprow *row = self->row + (y + my);
1986 2039
1987 for (x = 0; x < sw; x++) 2040 for (x = 0; x < sw1; x++)
1988 if (row->c0 <= x + mx && x + mx < row->c1) 2041 if (row->c0 <= x + mx && x + mx < row->c1)
1989 { 2042 {
1990 mapcell *cell = row->col + (x + mx - row->c0); 2043 mapcell *cell = row->col + (x + mx - row->c0);
1991 2044
1992 darkness[y * sw4 + x] = cell->darkness 2045 darkness1 [y * sw1 + x] = cell->darkness
1993 ? 255 - (cell->darkness - 1) 2046 ? 255 - (cell->darkness - 1)
1994 : 255 - FOW_DARKNESS; 2047 : 255 - FOW_DARKNESS;
1995 } 2048 }
1996 } 2049 }
1997 2050
2051 for (y = 0; y < sh; ++y)
2052 for (x = 0; x < sw; ++x)
2053 {
2054 uint8_t d11 = darkness1 [(y ) * sw1 + x ];
2055 uint8_t d21 = darkness1 [(y ) * sw1 + x + 1];
2056 uint8_t d31 = darkness1 [(y ) * sw1 + x + 2];
2057 uint8_t d12 = darkness1 [(y + 1) * sw1 + x ];
2058 uint8_t d22 = darkness1 [(y + 1) * sw1 + x + 1];
2059 uint8_t d32 = darkness1 [(y + 1) * sw1 + x + 2];
2060 uint8_t d13 = darkness1 [(y + 2) * sw1 + x ];
2061 uint8_t d23 = darkness1 [(y + 2) * sw1 + x + 1];
2062 uint8_t d33 = darkness1 [(y + 2) * sw1 + x + 2];
2063
2064 uint8_t r11 = (d11 + d21 + d12) / 3;
2065 uint8_t r21 = d21;
2066 uint8_t r31 = (d21 + d31 + d32) / 3;
2067
2068 uint8_t r12 = d12;
2069 uint8_t r22 = d22;
2070 uint8_t r32 = d32;
2071
2072 uint8_t r13 = (d13 + d23 + d12) / 3;
2073 uint8_t r23 = d23;
2074 uint8_t r33 = (d23 + d33 + d32) / 3;
2075
2076 darkness3 [(y * 3 ) * sw34 + (x * 3 )] = MAX (d22, r11);
2077 darkness3 [(y * 3 ) * sw34 + (x * 3 + 1)] = MAX (d22, r21);
2078 darkness3 [(y * 3 ) * sw34 + (x * 3 + 2)] = MAX (d22, r31);
2079 darkness3 [(y * 3 + 1) * sw34 + (x * 3 )] = MAX (d22, r12);
2080 darkness3 [(y * 3 + 1) * sw34 + (x * 3 + 1)] = MAX (d22, r22);
2081 darkness3 [(y * 3 + 1) * sw34 + (x * 3 + 2)] = MAX (d22, r32);
2082 darkness3 [(y * 3 + 2) * sw34 + (x * 3 )] = MAX (d22, r13);
2083 darkness3 [(y * 3 + 2) * sw34 + (x * 3 + 1)] = MAX (d22, r23);
2084 darkness3 [(y * 3 + 2) * sw34 + (x * 3 + 2)] = MAX (d22, r33);
2085 }
2086
2087 free (darkness1);
2088
1998 EXTEND (SP, 3); 2089 EXTEND (SP, 3);
1999 PUSHs (sv_2mortal (newSViv (sw4))); 2090 PUSHs (sv_2mortal (newSViv (sw34)));
2000 PUSHs (sv_2mortal (newSViv (sh))); 2091 PUSHs (sv_2mortal (newSViv (sh3)));
2001 PUSHs (darkness_sv); 2092 PUSHs (darkness3_sv);
2002} 2093}
2003 2094
2004SV * 2095SV *
2005get_rect (CFPlus::Map self, int x0, int y0, int w, int h) 2096get_rect (CFPlus::Map self, int x0, int y0, int w, int h)
2006 CODE: 2097 CODE:
… …
2140 } 2231 }
2141} 2232}
2142 2233
2143MODULE = CFPlus PACKAGE = CFPlus::MixChunk 2234MODULE = CFPlus PACKAGE = CFPlus::MixChunk
2144 2235
2236PROTOTYPES: DISABLE
2237
2145CFPlus::MixChunk 2238CFPlus::MixChunk
2146new_from_file (SV *class, char *path) 2239new_from_file (SV *class, char *path)
2147 CODE: 2240 CODE:
2148 RETVAL = Mix_LoadWAV (path); 2241 RETVAL = Mix_LoadWAV (path);
2149 OUTPUT: 2242 OUTPUT:
… …
2170 2263
2171MODULE = CFPlus PACKAGE = CFPlus::MixMusic 2264MODULE = CFPlus PACKAGE = CFPlus::MixMusic
2172 2265
2173int 2266int
2174volume (int volume = -1) 2267volume (int volume = -1)
2268 PROTOTYPE: ;$
2175 CODE: 2269 CODE:
2176 RETVAL = Mix_VolumeMusic (volume); 2270 RETVAL = Mix_VolumeMusic (volume);
2177 OUTPUT: 2271 OUTPUT:
2178 RETVAL 2272 RETVAL
2179 2273
… …
2209 RETVAL = Mix_FadeInMusicPos (self, loops, ms, position); 2303 RETVAL = Mix_FadeInMusicPos (self, loops, ms, position);
2210 OUTPUT: 2304 OUTPUT:
2211 RETVAL 2305 RETVAL
2212 2306
2213MODULE = CFPlus PACKAGE = CFPlus::OpenGL 2307MODULE = CFPlus PACKAGE = CFPlus::OpenGL
2308
2309PROTOTYPES: ENABLE
2214 2310
2215BOOT: 2311BOOT:
2216{ 2312{
2217 HV *stash = gv_stashpv ("CFPlus::OpenGL", 1); 2313 HV *stash = gv_stashpv ("CFPlus::OpenGL", 1);
2218 static const struct { 2314 static const struct {
… …
2234 const_iv (GL_ALPHA_TEST), 2330 const_iv (GL_ALPHA_TEST),
2235 const_iv (GL_NORMALIZE), 2331 const_iv (GL_NORMALIZE),
2236 const_iv (GL_RESCALE_NORMAL), 2332 const_iv (GL_RESCALE_NORMAL),
2237 const_iv (GL_FRONT), 2333 const_iv (GL_FRONT),
2238 const_iv (GL_BACK), 2334 const_iv (GL_BACK),
2335 const_iv (GL_AUX0),
2239 const_iv (GL_AND), 2336 const_iv (GL_AND),
2240 const_iv (GL_ONE), 2337 const_iv (GL_ONE),
2241 const_iv (GL_ZERO), 2338 const_iv (GL_ZERO),
2242 const_iv (GL_SRC_ALPHA), 2339 const_iv (GL_SRC_ALPHA),
2243 const_iv (GL_DST_ALPHA), 2340 const_iv (GL_DST_ALPHA),
… …
2298 const_iv (GL_QUAD_STRIP), 2395 const_iv (GL_QUAD_STRIP),
2299 const_iv (GL_TRIANGLES), 2396 const_iv (GL_TRIANGLES),
2300 const_iv (GL_TRIANGLE_STRIP), 2397 const_iv (GL_TRIANGLE_STRIP),
2301 const_iv (GL_TRIANGLE_FAN), 2398 const_iv (GL_TRIANGLE_FAN),
2302 const_iv (GL_PERSPECTIVE_CORRECTION_HINT), 2399 const_iv (GL_PERSPECTIVE_CORRECTION_HINT),
2400 const_iv (GL_POINT_SMOOTH_HINT),
2401 const_iv (GL_LINE_SMOOTH_HINT),
2402 const_iv (GL_POLYGON_SMOOTH_HINT),
2403 const_iv (GL_GENERATE_MIPMAP_HINT),
2303 const_iv (GL_FASTEST), 2404 const_iv (GL_FASTEST),
2405 const_iv (GL_DONT_CARE),
2406 const_iv (GL_NICEST),
2304 const_iv (GL_V2F), 2407 const_iv (GL_V2F),
2305 const_iv (GL_V3F), 2408 const_iv (GL_V3F),
2306 const_iv (GL_T2F_V3F), 2409 const_iv (GL_T2F_V3F),
2307 const_iv (GL_T2F_N3F_V3F), 2410 const_iv (GL_T2F_N3F_V3F),
2308# undef const_iv 2411# undef const_iv
… …
2334 CODE: 2437 CODE:
2335 RETVAL = (char *)glGetString (GL_EXTENSIONS); 2438 RETVAL = (char *)glGetString (GL_EXTENSIONS);
2336 OUTPUT: 2439 OUTPUT:
2337 RETVAL 2440 RETVAL
2338 2441
2339char *glGetString (GLenum pname) 2442const char *glGetString (GLenum pname)
2340 2443
2341GLint glGetInteger (GLenum pname) 2444GLint glGetInteger (GLenum pname)
2342 CODE: 2445 CODE:
2343 glGetIntegerv (pname, &RETVAL); 2446 glGetIntegerv (pname, &RETVAL);
2344 OUTPUT: 2447 OUTPUT:
… …
2509 2612
2510void glEndList () 2613void glEndList ()
2511 2614
2512void glCallList (int list) 2615void glCallList (int list)
2513 2616
2617MODULE = CFPlus PACKAGE = CFPlus::UI::Base
2618
2619PROTOTYPES: DISABLE
2620
2621void
2622find_widget (SV *widget, NV x, NV y)
2623 PPCODE:
2624{
2625 if (within_widget (widget, x, y))
2626 XPUSHs (widget);
2627}
2628

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines