Pigment

 view release on metacpan or  search on metacpan

xs/Event.xs  view on Meta::CPAN

	gperl_prepend_isa ("Pigment::Event::Expose", "Pigment::Event");

MODULE = Pigment::Event  PACKAGE = Pigment::Event::Configure

gint
x (PgmEvent *event)
	ALIAS:
		y = 1
		width = 2
		height = 3
	CODE:
		switch (ix) {
			case 0:
				RETVAL = event->configure.x;
				break;
			case 1:
				RETVAL = event->configure.y;
				break;
			case 2:
				RETVAL = event->configure.width;
				break;
			case 3:
				RETVAL = event->configure.height;
				break;
		}
	OUTPUT:
		RETVAL

BOOT:
	gperl_prepend_isa ("Pigment::Event::Configure", "Pigment::Event");

MODULE = Pigment::Event  PACKAGE = Pigment::Event::Dnd

guint32
time (PgmEvent *event)
	CODE:
		RETVAL = event->dnd.time;
	OUTPUT:
		RETVAL

gfloat
x (PgmEvent *event)
	ALIAS:
		y = 1
	CODE:
		switch (ix) {
			case 0:
				RETVAL = event->dnd.x;
				break;
			case 1:
				RETVAL = event->dnd.y;
				break;
		}
	OUTPUT:
		RETVAL

void
uri (PgmEvent *event)
	PREINIT:
		gchar **i;
	PPCODE:
		for (i = event->dnd.uri; *i; i++) {
			XPUSHs (newSVGChar (*i));
		}

BOOT:
	gperl_prepend_isa ("Pigment::Event::Dnd", "Pigment::Event");

MODULE = Pigment::Event  PACKAGE = Pigment::Event::State

PgmViewportState
changed_mask (PgmEvent *event)
	ALIAS:
		state_mask = 1
	CODE:
		switch (ix) {
			case 0:
				RETVAL = event->state.changed_mask;
				break;
			case 1:
				RETVAL = event->state.state_mask;
				break;
		}
	OUTPUT:
		RETVAL

BOOT:
	gperl_prepend_isa ("Pigment::Event::State", "Pigment::Event");

MODULE = Pigment::Event  PACKAGE = Pigment::Event::Delete

BOOT:
	gperl_prepend_isa ("Pigment::Event::Delete", "Pigment::Event");

MODULE = Pigment::Event  PACKAGE = Pigment::Event::Win32Message

guint32
time (PgmEvent *event)
	CODE:
		RETVAL = event->win32_message.time;
	OUTPUT:
		RETVAL

guint
message (PgmEvent *event)
	ALIAS:
		wparam = 1
	CODE:
		switch (ix) {
			case 0:
				RETVAL = event->win32_message.message;
				break;
			case 1:
				RETVAL = event->win32_message.wparam;
				break;
		}
	OUTPUT:
		RETVAL

glong
lparam (PgmEvent *event)



( run in 1.373 second using v1.01-cache-2.11-cpan-5511b514fd6 )