ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/server/typemap
Revision: 1.20
Committed: Mon Apr 23 18:09:58 2007 UTC (17 years, 1 month ago) by root
Branch: MAIN
Changes since 1.19: +20 -18 lines
Log Message: 
- add format utility function.
- split dynbuf into dynbuf and dynbuf_text.
- use dynbuf_text for examine strings instead of
  outputting each line seperately. tried to use stringstreams
  but they add insane overheads (as does std::string, but less so).

File Contents

# Content
1 val64 T_VAL64
2 uint64 T_VAL64
3 sint16 T_INT
4 sint8 T_INT
5 faceidx T_INT
6 animidx T_INT
7
8 object * T_CF_OBJ
9 partylist * T_CF_OBJ
10 archetype * T_CF_OBJ
11 maptile * T_CF_OBJ
12 struct region * T_CF_OBJ
13 region * T_CF_OBJ
14 client * T_CF_OBJ
15 player * T_CF_OBJ
16 living * T_CF_OBJ
17 attachable * T_CF_OBJ
18 std::string T_CF_OBJ
19 const std::string T_CF_OBJ
20
21 Settings * T_SETTINGS
22
23 object_ornull * T_CF_OBJ_ORNULL
24 mapstruct_ornull * T_CF_OBJ_ORNULL
25 octet_string T_CF_OCTETS
26 utf8_string T_CF_UTF8
27 const_octet_string T_CF_OCTETS
28 const_utf8_string T_CF_UTF8
29
30 INPUT
31
32 T_VAL64
33 $var = ($type)SvVAL64 ($arg);
34
35 T_CF_OBJ
36 sv_to ($arg, $var)
37
38 T_SETTINGS
39 $var = &settings
40
41 T_CF_OBJ_ORNULL
42 if (SvOK ($arg))
43 sv_to ($arg, $var);
44 else
45 $var = 0;
46
47 T_CF_OCTETS
48 $var = SvPVbyte_nolen ($arg)
49
50 T_CF_UTF8
51 $var = SvPVutf8_nolen ($arg)
52
53 OUTPUT
54
55 T_VAL64
56 $arg = newSVval64 ($var);
57
58 T_CF_OBJ_NORNULL
59 $arg = to_sv ($var);
60
61 T_CF_OBJ
62 $arg = to_sv ($var);
63
64 T_CF_OCTETS
65 $arg = $var ? newSVpv ($var, 0) : &PL_sv_undef;
66
67 T_CF_UTF8
68 if ($var)
69 {
70 sv_setpv ($arg, $var);
71 SvUTF8_on ($arg);
72 }
73