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 (12 years, 1 month ago) by root
Branch: MAIN
Changes since 1.9: +12 -0 lines
Log Message:
*** empty log message ***

File Contents

# User Rev Content
1 root 1.7 overlay * OVERLAY
2 root 1.5
3     Time T_UV
4     Atom T_UV
5     Window T_UV
6 root 1.9 Pixmap T_UV
7 root 1.3
8 root 1.6 urxvt::pixbuf T_PTROBJ
9    
10 root 1.7 octet_string OCTET_STRING
11     utf8_string UTF8_STRING
12    
13     rxvt_term * TERM
14 root 1.8 rxvt_img * IMG
15 root 1.7
16 root 1.6 GError ** T_UV
17 root 1.3
18 root 1.10 render_repeat_mode RENDER_REPEAT_MODE
19    
20 root 1.1 INPUT
21 root 1.3
22 root 1.7 TERM
23 root 1.5 $var = SvTERM ($arg);
24 root 1.7 OVERLAY
25 root 1.5 $var = SvOVERLAY ($arg);
26 root 1.1
27 root 1.7 OCTET_STRING
28 root 1.6 $var = SvPVbyte_nolen ($arg)
29    
30 root 1.7 UTF8_STRING
31     $var = SvPVutf8_nolen ($arg) /* imperfect, destroys references */
32 root 1.3
33 root 1.8 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 root 1.10 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 root 1.1 OUTPUT
50 root 1.3
51 root 1.7 TERM
52 root 1.5 $arg = newSVterm ($var);
53 root 1.3
54 root 1.8 IMG
55     sv_setref_pv ($arg, "urxvt::img", (void *)$var);
56