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 )