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.117 by root, Sat Dec 30 18:45:28 2006 UTC vs.
Revision 1.118 by root, Sat Dec 30 20:32:30 2006 UTC

2113 2113
2114void 2114void
2115maptile::players () 2115maptile::players ()
2116 PPCODE: 2116 PPCODE:
2117 if (GIMME_V == G_SCALAR) 2117 if (GIMME_V == G_SCALAR)
2118 XPUSHs (to_sv (THIS->players)); 2118 XPUSHs (sv_2mortal (to_sv (THIS->players)));
2119 else if (GIMME_V == G_ARRAY) 2119 else if (GIMME_V == G_ARRAY)
2120 { 2120 {
2121 EXTEND (SP, THIS->players); 2121 EXTEND (SP, THIS->players);
2122 for_all_players (pl) 2122 for_all_players (pl)
2123 if (pl->ob && pl->ob->map == THIS) 2123 if (pl->ob && pl->ob->map == THIS)
2124 PUSHs (to_sv (pl->ob)); 2124 PUSHs (sv_2mortal (to_sv (pl->ob)));
2125 } 2125 }
2126 2126
2127void play_sound_map (maptile *map, int x, int y, int sound_num) 2127void play_sound_map (maptile *map, int x, int y, int sound_num)
2128 2128
2129int out_of_map (maptile *map, int x, int y) 2129int out_of_map (maptile *map, int x, int y)

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines