ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/plugins/cfperl/cfperl.xs
(Generate patch)

Comparing deliantra/server/plugins/cfperl/cfperl.xs (file contents):
Revision 1.57 by root, Tue Jul 11 15:25:00 2006 UTC vs.
Revision 1.58 by elmex, Tue Jul 11 16:50:16 2006 UTC

… …
85#define PUSH_OB PUSHcfapi_va(POBJECT, object *) 85#define PUSH_OB PUSHcfapi_va(POBJECT, object *)
86#define PUSH_PL PUSHcfapi_va(PPLAYER, player *) 86#define PUSH_PL PUSHcfapi_va(PPLAYER, player *)
87#define PUSH_MAP PUSHcfapi_va(PMAP, mapstruct *) 87#define PUSH_MAP PUSHcfapi_va(PMAP, mapstruct *)
88#define PUSH_PV PUSHcfapi_va(STRING, const char *) 88#define PUSH_PV PUSHcfapi_va(STRING, const char *)
89#define PUSH_IV PUSHs (sv_2mortal (newSViv (va_arg (args, int)))) 89#define PUSH_IV PUSHs (sv_2mortal (newSViv (va_arg (args, int))))
90
91extern void pay_player(object *op, uint64 amount);
92extern uint64 pay_player_arch(object *op, const char *arch, uint64 amount);
90 93
91////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// 94//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
92 95
93// garbage collect some perl objects, if possible 96// garbage collect some perl objects, if possible
94// all objects no longer referenced and empty are 97// all objects no longer referenced and empty are
… …
1551 1554
1552object *cf_create_object_by_name (const char *name) 1555object *cf_create_object_by_name (const char *name)
1553 1556
1554void change_exp (object *op, double exp, const char *skill_name = 0, int flag = 0) 1557void change_exp (object *op, double exp, const char *skill_name = 0, int flag = 0)
1555 1558
1559void pay_player (object *op, double amount)
1560
1561double pay_player_arch (object *op, const char *arch, double amount)
1562
1556void player_lvl_adj (object *who, object *skill = 0) 1563void player_lvl_adj (object *who, object *skill = 0)
1557 1564
1558int kill_object (object *op, int dam = 0, object *hitter = 0, int type = AT_PHYSICAL) 1565int kill_object (object *op, int dam = 0, object *hitter = 0, int type = AT_PHYSICAL)
1559 1566
1560MODULE = cf PACKAGE = cf::object PREFIX = cf_ 1567MODULE = cf PACKAGE = cf::object PREFIX = cf_

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines