1 |
overlay * OVERLAY |
2 |
|
3 |
Time T_UV |
4 |
Atom T_UV |
5 |
Window T_UV |
6 |
Pixmap T_UV |
7 |
|
8 |
urxvt::pixbuf T_PTROBJ |
9 |
|
10 |
octet_string OCTET_STRING |
11 |
utf8_string UTF8_STRING |
12 |
|
13 |
rxvt_term * TERM |
14 |
rxvt_img * IMG |
15 |
|
16 |
GError ** T_UV |
17 |
|
18 |
render_repeat_mode RENDER_REPEAT_MODE |
19 |
|
20 |
INPUT |
21 |
|
22 |
TERM |
23 |
$var = SvTERM ($arg); |
24 |
OVERLAY |
25 |
$var = SvOVERLAY ($arg); |
26 |
|
27 |
OCTET_STRING |
28 |
$var = SvPVbyte_nolen ($arg) |
29 |
|
30 |
UTF8_STRING |
31 |
$var = SvPVutf8_nolen ($arg) /* imperfect, destroys references */ |
32 |
|
33 |
IMG |
34 |
if (SvROK ($arg) && sv_derived_from ($arg, \"urxvt::img\")) |
35 |
$var = INT2PTR ($type, SvIV ((SV *) SvRV ($arg))); |
36 |
else |
37 |
croak (\"%s is not of type urxvt::img\", \"$var\") |
38 |
|
39 |
RENDER_REPEAT_MODE |
40 |
if (SvOK ($arg)) |
41 |
{ |
42 |
$var = SvIV ($arg); |
43 |
if ($var != RepeatNone && $var != RepeatNormal && $var != RepeatPad && $var != RepeatReflect) |
44 |
croak (\"invalid repeat mode specified (%d)\\n\", $var); |
45 |
} |
46 |
else |
47 |
$var = RepeatNormal; |
48 |
|
49 |
OUTPUT |
50 |
|
51 |
TERM |
52 |
$arg = newSVterm ($var); |
53 |
|
54 |
IMG |
55 |
sv_setref_pv ($arg, "urxvt::img", (void *)$var); |
56 |
|