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

Comparing deliantra/server/server/cfperl.xs (file contents):
Revision 1.87 by elmex, Mon Dec 18 17:10:07 2006 UTC vs.
Revision 1.94 by elmex, Wed Dec 20 14:11:42 2006 UTC

… …
243 case DT_MAP: 243 case DT_MAP:
244 // va_arg (object *) when void * is passed is an XSI extension 244 // va_arg (object *) when void * is passed is an XSI extension
245 sv = to_sv (va_arg (ap, maptile *)); 245 sv = to_sv (va_arg (ap, maptile *));
246 break; 246 break;
247 247
248 case DT_SOCKET: 248 case DT_CLIENT:
249 sv = to_sv (va_arg (ap, client *)); 249 sv = to_sv (va_arg (ap, client *));
250 break; 250 break;
251 251
252 case DT_PLAYER: 252 case DT_PLAYER:
253 sv = to_sv (va_arg (ap, player *)); 253 sv = to_sv (va_arg (ap, player *));
… …
1147 const_iv (POTION) 1147 const_iv (POTION)
1148 const_iv (FOOD) 1148 const_iv (FOOD)
1149 const_iv (POISON) 1149 const_iv (POISON)
1150 const_iv (BOOK) 1150 const_iv (BOOK)
1151 const_iv (CLOCK) 1151 const_iv (CLOCK)
1152 const_iv (LIGHTNING)
1153 const_iv (ARROW) 1152 const_iv (ARROW)
1154 const_iv (BOW) 1153 const_iv (BOW)
1155 const_iv (WEAPON) 1154 const_iv (WEAPON)
1156 const_iv (ARMOUR) 1155 const_iv (ARMOUR)
1157 const_iv (PEDESTAL) 1156 const_iv (PEDESTAL)
… …
1177 const_iv (AMULET) 1176 const_iv (AMULET)
1178 const_iv (PLAYERMOVER) 1177 const_iv (PLAYERMOVER)
1179 const_iv (TELEPORTER) 1178 const_iv (TELEPORTER)
1180 const_iv (CREATOR) 1179 const_iv (CREATOR)
1181 const_iv (SKILL) 1180 const_iv (SKILL)
1182 const_iv (EXPERIENCE)
1183 const_iv (EARTHWALL) 1181 const_iv (EARTHWALL)
1184 const_iv (GOLEM) 1182 const_iv (GOLEM)
1185 const_iv (THROWN_OBJ) 1183 const_iv (THROWN_OBJ)
1186 const_iv (BLINDNESS) 1184 const_iv (BLINDNESS)
1187 const_iv (GOD) 1185 const_iv (GOD)
… …
1207 const_iv (FLOOR) 1205 const_iv (FLOOR)
1208 const_iv (FLESH) 1206 const_iv (FLESH)
1209 const_iv (INORGANIC) 1207 const_iv (INORGANIC)
1210 const_iv (SKILL_TOOL) 1208 const_iv (SKILL_TOOL)
1211 const_iv (LIGHTER) 1209 const_iv (LIGHTER)
1212 const_iv (TRAP_PART)
1213 const_iv (WALL) 1210 const_iv (BUILDABLE_WALL)
1214 const_iv (LIGHT_SOURCE)
1215 const_iv (MISC_OBJECT) 1211 const_iv (MISC_OBJECT)
1216 const_iv (MONSTER)
1217 const_iv (SPAWN_GENERATOR)
1218 const_iv (LAMP) 1212 const_iv (LAMP)
1219 const_iv (DUPLICATOR) 1213 const_iv (DUPLICATOR)
1220 const_iv (TOOL) 1214 const_iv (TOOL)
1221 const_iv (SPELLBOOK) 1215 const_iv (SPELLBOOK)
1222 const_iv (BUILDFAC) 1216 const_iv (BUILDFAC)
… …
1234 const_iv (SPELL_EFFECT) 1228 const_iv (SPELL_EFFECT)
1235 const_iv (CONVERTER) 1229 const_iv (CONVERTER)
1236 const_iv (BRACERS) 1230 const_iv (BRACERS)
1237 const_iv (POISONING) 1231 const_iv (POISONING)
1238 const_iv (SAVEBED) 1232 const_iv (SAVEBED)
1239 const_iv (POISONCLOUD)
1240 const_iv (FIREHOLES)
1241 const_iv (WAND) 1233 const_iv (WAND)
1242 const_iv (SCROLL) 1234 const_iv (SCROLL)
1243 const_iv (DIRECTOR) 1235 const_iv (DIRECTOR)
1244 const_iv (GIRDLE) 1236 const_iv (GIRDLE)
1245 const_iv (FORCE) 1237 const_iv (FORCE)
… …
1260 const_iv (DISEASE) 1252 const_iv (DISEASE)
1261 const_iv (SYMPTOM) 1253 const_iv (SYMPTOM)
1262 const_iv (BUILDER) 1254 const_iv (BUILDER)
1263 const_iv (MATERIAL) 1255 const_iv (MATERIAL)
1264 const_iv (ITEM_TRANSFORMER) 1256 const_iv (ITEM_TRANSFORMER)
1265 const_iv (QUEST)
1266 1257
1267 const_iv (NUM_SUBTYPES) 1258 const_iv (NUM_SUBTYPES)
1268 1259
1269 const_iv (ST_BD_BUILD) 1260 const_iv (ST_BD_BUILD)
1270 const_iv (ST_BD_REMOVE) 1261 const_iv (ST_BD_REMOVE)
… …
1455 const_iv (F_BUY) 1446 const_iv (F_BUY)
1456 const_iv (F_SHOP) 1447 const_iv (F_SHOP)
1457 const_iv (F_SELL) 1448 const_iv (F_SELL)
1458 1449
1459 const_iv (P_BLOCKSVIEW) 1450 const_iv (P_BLOCKSVIEW)
1451 const_iv (P_PLAYER)
1460 const_iv (P_NO_MAGIC) 1452 const_iv (P_NO_MAGIC)
1461 const_iv (P_IS_ALIVE) 1453 const_iv (P_IS_ALIVE)
1462 const_iv (P_NO_CLERIC) 1454 const_iv (P_NO_CLERIC)
1463 const_iv (P_NEED_UPDATE) 1455 const_iv (P_NEED_UPDATE)
1464 const_iv (P_NO_ERROR)
1465 const_iv (P_OUT_OF_MAP) 1456 const_iv (P_OUT_OF_MAP)
1466 const_iv (P_NEW_MAP) 1457 const_iv (P_NEW_MAP)
1467 1458
1468 const_iv (UP_OBJ_INSERT) 1459 const_iv (UP_OBJ_INSERT)
1469 const_iv (UP_OBJ_REMOVE) 1460 const_iv (UP_OBJ_REMOVE)
… …
1887 1878
1888void remove (object *op) 1879void remove (object *op)
1889 CODE: 1880 CODE:
1890 op->remove (); 1881 op->remove ();
1891 1882
1892void destroy (object *op, int recursive = 0) 1883void
1893 CODE: 1884object::destroy (int recursive = 0)
1894 op->destroy (recursive);
1895 1885
1896object *cf_object_present_archname_inside (object *op, char *whatstr) 1886object *cf_object_present_archname_inside (object *op, char *whatstr)
1897 1887
1898int cf_object_transfer (object *op, int x, int y, int r = 0, object_ornull *orig = 0) 1888int cf_object_transfer (object *op, int x, int y, int r = 0, object_ornull *orig = 0)
1899 1889
… …
2440 2430
2441INCLUDE: $PERL genacc client ../include/client.h | 2431INCLUDE: $PERL genacc client ../include/client.h |
2442 2432
2443int invoke (client *ns, int event, ...) 2433int invoke (client *ns, int event, ...)
2444 CODE: 2434 CODE:
2445 if (KLASS_OF (event) != KLASS_SOCKET) croak ("event class must be SOCKET"); 2435 if (KLASS_OF (event) != KLASS_CLIENT) croak ("event class must be CLIENT");
2446 AV *av = (AV *)sv_2mortal ((SV *)newAV ()); 2436 AV *av = (AV *)sv_2mortal ((SV *)newAV ());
2447 for (int i = 2; i < items; i++) av_push (av, SvREFCNT_inc (ST (i))); 2437 for (int i = 2; i < items; i++) av_push (av, SvREFCNT_inc (ST (i)));
2448 RETVAL = INVOKE_((event_type)event, ARG_SOCKET (ns), ARG_AV (av)); 2438 RETVAL = INVOKE_((event_type)event, ARG_CLIENT (ns), ARG_AV (av));
2449 OUTPUT: RETVAL 2439 OUTPUT: RETVAL
2450 2440
2451SV *registry (client *ns) 2441SV *registry (client *ns)
2452 2442
2443void
2444client::destroy ()
2445

Diff Legend

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