PageRenderTime 20ms CodeModel.GetById 16ms app.highlight 1ms RepoModel.GetById 1ms app.codeStats 0ms

/src/Core/objects/CDTrack.xs

http://github.com/PerlGameDev/SDL
Unknown | 44 lines | 37 code | 7 blank | 0 comment | 0 complexity | a48d77d73221b74524b123fb715645b4 MD5 | raw file
 1#include "EXTERN.h"
 2#include "perl.h"
 3#include "XSUB.h"
 4#include "ppport.h"
 5
 6#ifndef aTHX_
 7#define aTHX_
 8#endif
 9
10#include <SDL.h>
11
12MODULE = SDL::CDTrack 	PACKAGE = SDL::CDTrack    PREFIX = cdt_
13
14Uint8
15cdt_id( track )
16	SDL_CDtrack *track
17	CODE:
18		RETVAL = track->id;
19	OUTPUT:
20		RETVAL
21
22Uint8
23cdt_type( track )
24	SDL_CDtrack *track
25	CODE:
26		RETVAL = track->type;
27	OUTPUT:
28		RETVAL
29
30Uint16
31cdt_length( track )
32	SDL_CDtrack *track
33	CODE:
34		RETVAL = track->length;
35	OUTPUT:
36		RETVAL
37
38Uint32
39cdt_offset( track )
40	SDL_CDtrack *track
41	CODE:
42		RETVAL = track->offset;
43	OUTPUT: 
44		RETVAL