included images, and demo-expanding
[sdlgit/SDL_perl.git] / typemap
1 TYPEMAP
2 const Uint16 *          T_PTR
3 Uint8                   T_U_CHAR
4 Uint8 *                 T_PTR
5 const Uint8*            T_PTR
6 Uint8 **                T_PTR
7 Uint16                  T_UV
8 Uint16 *                T_PTR
9 Uint32                  T_UV
10 Uint32 *                T_PTR
11 SDLKey                  T_UV
12 Sint16                  T_IV
13 Sint16 *                T_PTR
14 Sint32                  T_IV
15 Sint32 *                T_PTR
16 SDL_Event *             T_PTR
17 SDL_Surface *           T_PTR
18 SDL_SysWMmsg *          T_PTR
19 SDL_CD *                T_PTR
20 SDL_CDtrack *           T_PTR
21 SDL_TimerCallback       T_PTR
22 SDL_Rect *              O_OBJECT
23 SDL_Color *             T_PTR
24 SDL_Palette *           T_PTR
25 SDL_PixelFormat *       T_PTR
26 SDL_Cursor *            T_PTR
27 SDL_AudioSpec *         T_PTR
28 SDL_AudioCVT *          T_PTR
29 Mix_Fading              T_UV
30 Mix_Chunk *             T_PTR
31 Mix_Music *             T_PTR
32 SDL_GLattr              T_IV
33 int *                   T_PTR
34 void *                  T_PTR
35 SDL_TimerID             T_PTR
36 SDL_NewTimerCallback    T_PTR
37 SDL_Joystick *          T_PTR
38 SDLNet_SocketSet        T_PTR
39 TCPsocket               T_PTR
40 UDPsocket               T_PTR
41 UDPpacket *             T_PTR
42 UDPpacket **            T_PTR
43 IPaddress*              T_PTR
44 SDLNet_GenericSocket    T_PTR
45 TTF_Font *              T_PTR
46 SDL_Overlay *           T_PTR
47 SMPEG_Info *            T_PTR
48 SMPEG *                 T_PTR
49 SMPEGstatus             T_IV
50 SDL_mutex *             T_PTR
51 GLbitfield              T_IV
52 GLenum                  T_IV
53 ConsoleInformation *    T_PTR
54 GLboolean               T_U_CHAR
55 GLUquadric *            T_PTR
56 GLdouble                T_NV
57 GLUnurbsObj *           T_PTR
58 GLUtesselator *         T_PTR
59 GLuint                  T_UV
60 GLuint*                 T_PTR
61 GLint                   T_IV
62 GLint*                  T_PTR
63 float *                 T_PTR
64 float                   T_NV
65 GLfloat                 T_NV
66 Sound_DecoderInfo *     T_PTR
67 const Sound_DecoderInfo *       T_PTR
68 Sound_Sample *          T_PTR
69 Sound_AudioInfo *       T_PTR
70 SDL_RWops*              T_PTR
71 SDL_svg_context*        T_PTR
72
73 OUTPUT
74
75 # The Perl object is blessed into 'CLASS', which should be a
76 # char* having the name of the package for the blessing.
77 O_OBJECT
78         sv_setref_pv( $arg, CLASS, (void*)$var );
79
80
81 INPUT
82
83 O_OBJECT
84         if( sv_isobject($arg) && (SvTYPE(SvRV($arg)) == SVt_PVMG) )
85                 $var = ($type)SvIV((SV*)SvRV( $arg ));
86         else{
87                 warn( \"${Package}::$func_name() -- $var is not a blessed SV reference\" );
88                 XSRETURN_UNDEF;
89         }
90
91