ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/server/typemap
Revision: 1.1
Committed: Tue Aug 15 17:10:46 2006 UTC (17 years, 9 months ago) by root
Branch: MAIN
Log Message:
converted perl to a mandatory / non-dynamic plug-in, firts step to put it fully in-core

File Contents

# Content
1 val64 T_VAL64
2 uint64 T_VAL64
3
4 const object * T_OBJECT
5 object * T_OBJECT
6 partylist * T_PARTY
7 archetype * T_ARCH
8 mapstruct * T_MAP
9 region * T_REGION
10 player * T_PLAYER
11 living * T_LIVING
12
13 object_ornull * T_OBJECT_ORNULL
14 mapstruct_ornull * T_MAP_ORNULL
15
16 INPUT
17
18 T_VAL64
19 $var = ($type)SvVAL64 ($arg);
20
21 T_OBJECT
22 $var = (object *)SvPTR ($arg, \"cf::object\");
23 T_PARTY
24 $var = (partylist *)SvPTR ($arg, \"cf::party\");
25 T_ARCH
26 $var = (archetype *)SvPTR ($arg, \"cf::arch\");
27 T_MAP
28 $var = (mapstruct *)SvPTR ($arg, \"cf::map\");
29 T_REGION
30 $var = (region *)SvPTR ($arg, \"cf::region\");
31 T_PLAYER
32 $var = (player *)SvPTR ($arg, \"cf::player\");
33 T_LIVING
34 $var = (living *)SvPTR ($arg, \"cf::living\");
35
36 T_OBJECT_ORNULL
37 $var = (object *)SvPTR_ornull ($arg, \"cf::object\");
38 T_MAP_ORNULL
39 $var = (mapstruct *)SvPTR_ornull ($arg, \"cf::map\");
40
41 OUTPUT
42
43 T_VAL64
44 $arg = newSVval64 ($var);
45
46 T_OBJECT
47 $arg = newSVcfapi (CFAPI_POBJECT, $var);
48 T_MAP
49 $arg = newSVcfapi (CFAPI_PMAP, $var);
50 T_ARCH
51 $arg = newSVcfapi (CFAPI_PARCH, $var);
52 T_PARTY
53 $arg = newSVcfapi (CFAPI_PPARTY, $var);
54 T_REGION
55 $arg = newSVcfapi (CFAPI_PREGION, $var);
56 T_PLAYER
57 $arg = newSVcfapi (CFAPI_PPLAYER, $var);
58 T_LIVING
59 $arg = newSVptr ($var, \"cf::living\");
60