[ViewVC] Annotation of: cvs/deliantra/server/server/typemap

val64                   T_VAL64
uint64                  T_VAL64
sint16                  T_INT
sint8                   T_INT
faceidx                 T_INT
animidx                 T_INT

shstr                   T_PV
const shstr             T_PV

object *                T_CF_OBJ
partylist *             T_CF_OBJ
archetype *             T_CF_OBJ
maptile *               T_CF_OBJ
struct region *         T_CF_OBJ
region *                T_CF_OBJ
client *                T_CF_OBJ
player *                T_CF_OBJ
living *                T_CF_OBJ
attachable *            T_CF_OBJ
treasurelist *          T_CF_OBJ
std::string             T_CF_OBJ
const std::string       T_CF_OBJ

Settings *              T_SETTINGS

object_ornull *         T_CF_OBJ_ORNULL
mapstruct_ornull *      T_CF_OBJ_ORNULL
octet_string            T_CF_OCTETS
utf8_string             T_CF_UTF8
const_octet_string      T_CF_OCTETS
const_utf8_string       T_CF_UTF8

INPUT

T_VAL64
        $var = ($type)SvVAL64 ($arg);

T_CF_OBJ
        sv_to ($arg, $var)

T_SETTINGS
        $var = &settings

T_CF_OBJ_ORNULL
        if (SvOK ($arg))
          sv_to ($arg, $var);
        else
          $var = 0;

T_CF_OCTETS
        $var = SvPVbyte_nolen ($arg)

T_CF_UTF8
        $var = SvPVutf8_nolen ($arg)

OUTPUT

T_VAL64
        $arg = newSVval64 ($var);

T_CF_OBJ_NORNULL
        $arg = to_sv ($var);

T_CF_OBJ
        $arg = to_sv ($var);

T_CF_OCTETS
        $arg = $var ? newSVpv ($var, 0) : &PL_sv_undef;

T_CF_UTF8
        if ($var)
          {
            sv_setpv ($arg, $var);
            SvUTF8_on ($arg);
          }

Revision:	1.24
Committed:	Thu Jul 5 08:10:30 2007 UTC (16 years, 10 months ago) by root
Branch:	MAIN
Changes since 1.23:	+3 -0 lines
Log Message:	- unbundle marker code into force_find/force_add - use completely different (more efficient) speed logic - make those methods available to perl - to avoid numerical errors use an exact fp number for MIN_ACTIVE_SPEED.
#	User	Rev	Content
1	root	1.20	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	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.7
25	root	1.20	Settings * T_SETTINGS
26	root	1.1
27	root	1.9	object_ornull * T_CF_OBJ_ORNULL
28			mapstruct_ornull * T_CF_OBJ_ORNULL
29	root	1.16	octet_string T_CF_OCTETS
30			utf8_string T_CF_UTF8
31			const_octet_string T_CF_OCTETS
32			const_utf8_string T_CF_UTF8
33	root	1.1
34			INPUT
35
36			T_VAL64
37			$var = ($type)SvVAL64 ($arg);
38
39	root	1.7	T_CF_OBJ
40	root	1.4	sv_to ($arg, $var)
41	root	1.7
42	root	1.6	T_SETTINGS
43	root	1.9	$var = &settings
44	root	1.7
45	root	1.9	T_CF_OBJ_ORNULL
46			if (SvOK ($arg))
47			sv_to ($arg, $var);
48			else
49			$var = 0;
50	root	1.1
51	root	1.16	T_CF_OCTETS
52			$var = SvPVbyte_nolen ($arg)
53
54			T_CF_UTF8
55			$var = SvPVutf8_nolen ($arg)
56
57	root	1.1	OUTPUT
58
59			T_VAL64
60			$arg = newSVval64 ($var);
61
62	root	1.9	T_CF_OBJ_NORNULL
63	root	1.4	$arg = to_sv ($var);
64	root	1.7
65			T_CF_OBJ
66	root	1.4	$arg = to_sv ($var);
67	root	1.1
68	root	1.16	T_CF_OCTETS
69	root	1.17	$arg = $var ? newSVpv ($var, 0) : &PL_sv_undef;
70	root	1.16
71			T_CF_UTF8
72	root	1.17	if ($var)
73			{
74	root	1.18	sv_setpv ($arg, $var);
75	root	1.17	SvUTF8_on ($arg);
76			}
77	root	1.16