ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/server/typemap
Revision: 1.29
Committed: Mon Aug 11 23:23:41 2008 UTC (15 years, 9 months ago) by root
Branch: MAIN
CVS Tags: rel-2_7
Changes since 1.28: +1 -0 lines
Log Message:
*** empty log message ***

File Contents

# User Rev Content
1 root 1.20 val64 T_VAL64
2 root 1.28 sint64 T_VAL64
3     sint32 T_IV
4     sint16 T_IV
5     sint8 T_IV
6 root 1.27 uint64 T_UVAL64
7 root 1.28 uint32 T_UV
8     uint16 T_UV
9     uint8 T_UV
10    
11 root 1.20 faceidx T_INT
12     animidx T_INT
13    
14 root 1.24 shstr T_PV
15     const shstr T_PV
16    
17 root 1.20 object * T_CF_OBJ
18     partylist * T_CF_OBJ
19     archetype * T_CF_OBJ
20     maptile * T_CF_OBJ
21     struct region * T_CF_OBJ
22     region * T_CF_OBJ
23     client * T_CF_OBJ
24     player * T_CF_OBJ
25     living * T_CF_OBJ
26 root 1.29 mapspace * T_CF_OBJ
27 root 1.20 attachable * T_CF_OBJ
28 root 1.21 treasurelist * T_CF_OBJ
29 root 1.20 std::string T_CF_OBJ
30     const std::string T_CF_OBJ
31 root 1.27 UUID T_CF_OBJ
32 root 1.7
33 root 1.26 object_thawer * T_CF_OBJ
34     object_freezer * T_CF_OBJ
35    
36 root 1.20 Settings * T_SETTINGS
37 root 1.1
38 root 1.9 object_ornull * T_CF_OBJ_ORNULL
39     mapstruct_ornull * T_CF_OBJ_ORNULL
40 root 1.16 octet_string T_CF_OCTETS
41     utf8_string T_CF_UTF8
42     const_octet_string T_CF_OCTETS
43     const_utf8_string T_CF_UTF8
44 root 1.1
45     INPUT
46    
47     T_VAL64
48     $var = ($type)SvVAL64 ($arg);
49    
50 root 1.27 T_UVAL64
51     $var = ($type)SvUVAL64 ($arg);
52    
53 root 1.7 T_CF_OBJ
54 root 1.25 sv_to ($arg, $var);
55     if (!$var)
56     warn (\"must not pass invalid/null cf_obj here\");
57 root 1.7
58 root 1.9 T_CF_OBJ_ORNULL
59     if (SvOK ($arg))
60     sv_to ($arg, $var);
61     else
62     $var = 0;
63 root 1.1
64 root 1.26 T_SETTINGS
65     $var = &settings
66    
67 root 1.16 T_CF_OCTETS
68     $var = SvPVbyte_nolen ($arg)
69    
70     T_CF_UTF8
71     $var = SvPVutf8_nolen ($arg)
72    
73 root 1.1 OUTPUT
74    
75     T_VAL64
76     $arg = newSVval64 ($var);
77    
78 root 1.27 T_UVAL64
79     $arg = newSVuval64 ($var);
80    
81 root 1.9 T_CF_OBJ_NORNULL
82 root 1.4 $arg = to_sv ($var);
83 root 1.7
84     T_CF_OBJ
85 root 1.4 $arg = to_sv ($var);
86 root 1.1
87 root 1.16 T_CF_OCTETS
88 root 1.17 $arg = $var ? newSVpv ($var, 0) : &PL_sv_undef;
89 root 1.16
90     T_CF_UTF8
91 root 1.17 if ($var)
92     {
93 root 1.18 sv_setpv ($arg, $var);
94 root 1.17 SvUTF8_on ($arg);
95     }
96 root 1.16