ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/typemap
Revision: 1.10
Committed: Tue Jun 5 13:39:26 2012 UTC (11 years, 11 months ago) by root
Branch: MAIN
Changes since 1.9: +12 -0 lines
Log Message:
*** empty log message ***

File Contents

# Content
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