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.35 by root, Fri Mar 17 00:51:33 2006 UTC vs.
Revision 1.38 by root, Sat Mar 18 01:32:53 2006 UTC

… …
216 case CFAPI_INT: 216 case CFAPI_INT:
217 sv = newSViv (*va_arg (args, int *)); 217 sv = newSViv (*va_arg (args, int *));
218 break; 218 break;
219 219
220 case CFAPI_LONG: 220 case CFAPI_LONG:
221 sv = newSViv (*va_arg (args, long *)); 221 sv = newSVnv ((double)*va_arg (args, sint64 *)); /* oh, the humanity! */
222 break; 222 break;
223 223
224 case CFAPI_DOUBLE: 224 case CFAPI_DOUBLE:
225 sv = newSViv (*va_arg (args, double *)); 225 sv = newSViv (*va_arg (args, double *));
226 break; 226 break;
… …
1014 const_iv (M_LIQUID) 1014 const_iv (M_LIQUID)
1015 const_iv (M_SOFT_METAL) 1015 const_iv (M_SOFT_METAL)
1016 const_iv (M_BONE) 1016 const_iv (M_BONE)
1017 const_iv (M_ICE) 1017 const_iv (M_ICE)
1018 const_iv (M_SPECIAL) 1018 const_iv (M_SPECIAL)
1019
1020 const_iv (SK_EXP_ADD_SKILL)
1021 const_iv (SK_EXP_TOTAL)
1022 const_iv (SK_EXP_NONE)
1023 const_iv (SK_SUBTRACT_SKILL_EXP)
1024
1025 const_iv (SK_LOCKPICKING)
1026 const_iv (SK_HIDING)
1027 const_iv (SK_SMITHERY)
1028 const_iv (SK_BOWYER)
1029 const_iv (SK_JEWELER)
1030 const_iv (SK_ALCHEMY)
1031 const_iv (SK_STEALING)
1032 const_iv (SK_LITERACY)
1033 const_iv (SK_BARGAINING)
1034 const_iv (SK_JUMPING)
1035 const_iv (SK_DET_MAGIC)
1036 const_iv (SK_ORATORY)
1037 const_iv (SK_SINGING)
1038 const_iv (SK_DET_CURSE)
1039 const_iv (SK_FIND_TRAPS)
1040 const_iv (SK_MEDITATION)
1041 const_iv (SK_PUNCHING)
1042 const_iv (SK_FLAME_TOUCH)
1043 const_iv (SK_KARATE)
1044 const_iv (SK_CLIMBING)
1045 const_iv (SK_WOODSMAN)
1046 const_iv (SK_INSCRIPTION)
1047 const_iv (SK_ONE_HANDED_WEAPON)
1048 const_iv (SK_MISSILE_WEAPON)
1049 const_iv (SK_THROWING)
1050 const_iv (SK_USE_MAGIC_ITEM)
1051 const_iv (SK_DISARM_TRAPS)
1052 const_iv (SK_SET_TRAP)
1053 const_iv (SK_THAUMATURGY)
1054 const_iv (SK_PRAYING)
1055 const_iv (SK_CLAWING)
1056 const_iv (SK_LEVITATION)
1057 const_iv (SK_SUMMONING)
1058 const_iv (SK_PYROMANCY)
1059 const_iv (SK_EVOCATION)
1060 const_iv (SK_SORCERY)
1061 const_iv (SK_TWO_HANDED_WEAPON)
1019 }; 1062 };
1020 1063
1021 for (civ = const_iv + sizeof (const_iv) / sizeof (const_iv [0]); civ-- > const_iv; ) 1064 for (civ = const_iv + sizeof (const_iv) / sizeof (const_iv [0]); civ-- > const_iv; )
1022 newCONSTSUB (stash, (char *)civ->name, newSViv (civ->iv)); 1065 newCONSTSUB (stash, (char *)civ->name, newSViv (civ->iv));
1023 1066
… …
1167 prop (CFAPI_INT, OBJECT_PROP_ANIM_SPEED) 1210 prop (CFAPI_INT, OBJECT_PROP_ANIM_SPEED)
1168 prop (CFAPI_INT, OBJECT_PROP_FRIENDLY) 1211 prop (CFAPI_INT, OBJECT_PROP_FRIENDLY)
1169 prop (CFAPI_STRING, OBJECT_PROP_SHORT_NAME) 1212 prop (CFAPI_STRING, OBJECT_PROP_SHORT_NAME)
1170 prop (CFAPI_INT, OBJECT_PROP_MAGICAL) 1213 prop (CFAPI_INT, OBJECT_PROP_MAGICAL)
1171 prop (CFAPI_INT, OBJECT_PROP_LUCK) 1214 prop (CFAPI_INT, OBJECT_PROP_LUCK)
1172 prop (CFAPI_LONG, OBJECT_PROP_EXP)
1173 prop (CFAPI_POBJECT, OBJECT_PROP_OWNER) 1215 prop (CFAPI_POBJECT, OBJECT_PROP_OWNER)
1174 prop (CFAPI_POBJECT, OBJECT_PROP_PRESENT) 1216 prop (CFAPI_POBJECT, OBJECT_PROP_PRESENT)
1175 prop (CFAPI_INT, OBJECT_PROP_CHEATER) 1217 prop (CFAPI_INT, OBJECT_PROP_CHEATER)
1176 prop (CFAPI_INT, OBJECT_PROP_MERGEABLE) 1218 prop (CFAPI_INT, OBJECT_PROP_MERGEABLE)
1177 prop (CFAPI_INT, OBJECT_PROP_PICKABLE) 1219 prop (CFAPI_INT, OBJECT_PROP_PICKABLE)
… …
1335 1377
1336void cf_object_free (object *op) 1378void cf_object_free (object *op)
1337 1379
1338object *cf_object_present_archname_inside (object *op, char *whatstr) 1380object *cf_object_present_archname_inside (object *op, char *whatstr)
1339 1381
1340int cf_object_transfer (object *op, int x, int y, int r, object *orig) 1382int cf_object_transfer (object *op, int x, int y, int r = 0, object_ornull *orig = 0)
1341 1383
1342int cf_object_change_map (object *op, int x, int y, mapstruct *map) 1384int cf_object_change_map (object *op, int x, int y, mapstruct *map)
1343 1385
1344object *cf_object_clone (object *op, int clonetype = 0) 1386object *cf_object_clone (object *op, int clonetype = 0)
1345 1387
… …
1486partylist *cf_player_get_party (object *op) 1528partylist *cf_player_get_party (object *op)
1487 ALIAS: party = 0 1529 ALIAS: party = 0
1488 1530
1489void cf_player_set_party (object *op, partylist *party) 1531void cf_player_set_party (object *op, partylist *party)
1490 1532
1533void change_skill (object *op, double exp, char *skill_name = 0, int flag = 0)
1534
1491 1535
1492MODULE = cf PACKAGE = cf::object::map PREFIX = cf_ 1536MODULE = cf PACKAGE = cf::object::map PREFIX = cf_
1493 1537
1494MODULE = cf PACKAGE = cf::player PREFIX = cf_player_ 1538MODULE = cf PACKAGE = cf::player PREFIX = cf_player_
1495 1539
… …
1588 ALIAS: map = 0 1632 ALIAS: map = 0
1589 1633
1590mapstruct *cf_map_get_first () 1634mapstruct *cf_map_get_first ()
1591 PROTOTYPE: 1635 PROTOTYPE:
1592 ALIAS: first = 0 1636 ALIAS: first = 0
1637
1638# whoever "designed" the plug-in api should have wasted
1639# his/her time with staying away form the project - would have
1640# saved others a lot of time, without doubt.
1641void set_path (mapstruct *where, char *path)
1642 CODE:
1643 strcpy (where->path, path);
1644
1645bool unique (mapstruct *map)
1646 CODE:
1647 RETVAL = map->unique;
1648 OUTPUT:
1649 RETVAL
1650
1651void set_unique (mapstruct *map, bool unique)
1652 CODE:
1653 map->unique = unique;
1593 1654
1594object *cf_map_insert_object_there (mapstruct *where, object *op, object *originator, int flags) 1655object *cf_map_insert_object_there (mapstruct *where, object *op, object *originator, int flags)
1595 1656
1596object *cf_map_insert_object (mapstruct *where, object* op, int x, int y) 1657object *cf_map_insert_object (mapstruct *where, object* op, int x, int y)
1597 1658
… …
1710 SVptr_cache_set (o, sv); 1771 SVptr_cache_set (o, sv);
1711 } 1772 }
1712 } 1773 }
1713 } 1774 }
1714} 1775}
1776
1715 1777
1716MODULE = cf PACKAGE = cf::arch PREFIX = cf_archetype_ 1778MODULE = cf PACKAGE = cf::arch PREFIX = cf_archetype_
1717 1779
1718archetype *cf_archetype_get_first() 1780archetype *cf_archetype_get_first()
1719 PROTOTYPE: 1781 PROTOTYPE:

Diff Legend

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