Revision: | 1.11 |
Committed: | Thu Jun 14 18:19:11 2012 UTC (12 years, 1 month ago) by root |
Branch: | MAIN |
CVS Tags: | rxvt-unicode-rel-9_29, rxvt-unicode-rel-9_26, rxvt-unicode-rel-9_25, rxvt-unicode-rel-9_22, rxvt-unicode-rel-9_20, rxvt-unicode-rel-9_21, rxvt-unicode-rel-9_19, rxvt-unicode-rel-9_18, rxvt-unicode-rel-9_17, rxvt-unicode-rel-9_16, rxvt-unicode-rel-9_30 |
Changes since 1.10: | +1 -0 lines |
Log Message: | *** empty log message *** |
# | Content |
---|---|
1 | overlay * OVERLAY |
2 | |
3 | Time T_UV |
4 | Atom T_UV |
5 | Window T_UV |
6 | Pixmap T_UV |
7 | rxvt_img::nv T_NV |
8 | |
9 | urxvt::pixbuf T_PTROBJ |
10 | |
11 | octet_string OCTET_STRING |
12 | utf8_string UTF8_STRING |
13 | |
14 | rxvt_term * TERM |
15 | rxvt_img * IMG |
16 | |
17 | GError ** T_UV |
18 | |
19 | render_repeat_mode RENDER_REPEAT_MODE |
20 | |
21 | INPUT |
22 | |
23 | TERM |
24 | $var = SvTERM ($arg); |
25 | OVERLAY |
26 | $var = SvOVERLAY ($arg); |
27 | |
28 | OCTET_STRING |
29 | $var = SvPVbyte_nolen ($arg) |
30 | |
31 | UTF8_STRING |
32 | $var = SvPVutf8_nolen ($arg) /* imperfect, destroys references */ |
33 | |
34 | IMG |
35 | if (SvROK ($arg) && sv_derived_from ($arg, \"urxvt::img\")) |
36 | $var = INT2PTR ($type, SvIV ((SV *) SvRV ($arg))); |
37 | else |
38 | croak (\"%s is not of type urxvt::img\", \"$var\") |
39 | |
40 | RENDER_REPEAT_MODE |
41 | if (SvOK ($arg)) |
42 | { |
43 | $var = SvIV ($arg); |
44 | if ($var != RepeatNone && $var != RepeatNormal && $var != RepeatPad && $var != RepeatReflect) |
45 | croak (\"invalid repeat mode specified (%d)\\n\", $var); |
46 | } |
47 | else |
48 | $var = RepeatNormal; |
49 | |
50 | OUTPUT |
51 | |
52 | TERM |
53 | $arg = newSVterm ($var); |
54 | |
55 | IMG |
56 | sv_setref_pv ($arg, "urxvt::img", (void *)$var); |
57 |