The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"

#include "ppport.h"
#include <gdk/gdk.h>
#include <gtk/gtk.h>
#include <gperl.h>


MODULE = WWW::WebKit		PACKAGE = WWW::WebKit::XSHelper

void
set_int_return_value(return_value, value)
	gpointer return_value
	int      value
    CODE:
        *(int*)return_value = value;

void
set_string_return_value(return_value, value)
	gpointer return_value
	char*	 value
    CODE:
        /* probably shouldn't be a C string, but a WebDOMString or alike */
        *(char*)return_value = value;