ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/typemap
Revision: 1.8
Committed: Sun Jun 3 18:04:44 2012 UTC (11 years, 11 months ago) by root
Branch: MAIN
Changes since 1.7: +10 -1 lines
Log Message:
sigh

File Contents

# Content
1 overlay * OVERLAY
2
3 Time T_UV
4 Atom T_UV
5 Window T_UV
6
7 urxvt::pixbuf T_PTROBJ
8
9 octet_string OCTET_STRING
10 utf8_string UTF8_STRING
11
12 rxvt_term * TERM
13 rxvt_img * IMG
14
15 GError ** T_UV
16
17 INPUT
18
19 TERM
20 $var = SvTERM ($arg);
21 OVERLAY
22 $var = SvOVERLAY ($arg);
23
24 OCTET_STRING
25 $var = SvPVbyte_nolen ($arg)
26
27 UTF8_STRING
28 $var = SvPVutf8_nolen ($arg) /* imperfect, destroys references */
29
30 IMG
31 if (SvROK ($arg) && sv_derived_from ($arg, \"urxvt::img\"))
32 $var = INT2PTR ($type, SvIV ((SV *) SvRV ($arg)));
33 else
34 croak (\"%s is not of type urxvt::img\", \"$var\")
35
36 OUTPUT
37
38 TERM
39 $arg = newSVterm ($var);
40
41 IMG
42 sv_setref_pv ($arg, "urxvt::img", (void *)$var);
43