view release on metacpan or  search on metacpan

xs/Event.xs  view on Meta::CPAN

				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