xs/GtkExText.xs

The content is

#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"

#include "GtkDefs.h"
#include <gtkextext.h>;
#include "GtkExTextDefs.h"
MODULE = Gtk::ExText		PACKAGE = Gtk::ExText		PREFIX = gtk_extext_

void
init(Class)
	SV *	Class
	CODE:
	{
		static int did_it = 0;
		if (did_it)
			return;
		did_it = 1;
		GtkExText_InstallTypedefs();
		GtkExText_InstallObjects();
	}

Gtk::ExText_Sink
new(Class,...)
	SV * Class
	CODE:
	{
		GtkWidget * g;
		int * attr = malloc(sizeof(int)*(items));
		int i;
		for (i=0; i < items -1; ++i)
			attr[i] = SvIV(ST(i+1));
		attr[i] = 0;
		g = gtk_extext_new(attr);
		RETVAL = g ? GTK_EXTEXT(g) : 0;
		free(attr);
	}
	OUTPUT:
	RETVAL

Gtk::ExText_Sink
share_new(Class, share, ...)
	SV * Class
	Gtk::ExText	share
	CODE:
	{
		int * attr = malloc(sizeof(int)*(items-1));
		int i;
		for (i=0; i < items -2; ++i)
			attr[i] = SvIV(ST(i+2));
		attr[i] = 0;
		RETVAL = GTK_EXTEXT(gtk_extext_share_new(attr, share));
		free(attr);
	}
	OUTPUT:
	RETVAL

INCLUDE: ../build/boxed.xsh

INCLUDE: ../build/objects.xsh

INCLUDE: ../build/extension.xsh