ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/server/typemap
Revision: 1.27
Committed: Fri Apr 11 13:59:06 2008 UTC (16 years, 2 months ago) by root
Branch: MAIN
CVS Tags: rel-2_5
Changes since 1.26: +8 -1 lines
Log Message:
*** empty log message ***

File Contents

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