|
#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"
#include "ppport.h"
#include "helper.h"
#include <SDL.h>
#ifdef HAVE_SDL_PANGO
#include <SDL_Pango.h>
void _free_context( void *object)
{
SDLPango_FreeContext((SDLPango_Context *)object);
}
#endif
MODULE = SDL::Pango::Context PACKAGE = SDL::Pango::Context PREFIX = context_
= for documentation
See L<http:
=cut
#ifdef HAVE_SDL_PANGO
SDLPango_Context *
context_new(CLASS, ...)
char * CLASS
CODE:
if (items > 1)
RETVAL = SDLPango_CreateContext_GivenFontDesc(( char *)SvPV(ST(1), PL_na));
else
RETVAL = SDLPango_CreateContext();
OUTPUT:
RETVAL
void
context_DESTROY(bag)
SV *bag
CODE:
objDESTROY(bag, _free_context);
#endif
|