[ViewVC] Diff of: cvs/deliantra/server/server/cfperl.xs

Comparing deliantra/server/server/cfperl.xs (file contents):
Revision 1.160 by elmex, Wed Jan 31 14:11:02 2007 UTC vs.
Revision 1.161 by root, Thu Feb 1 19:15:39 2007 UTC

 void cf_player_move (player *pl, int dir)
 void play_sound_player_only (player *pl, int soundnum, int x = 0, int y = 0);
-player *first ()
-	CODE:
-        RETVAL = first_player;
-        OUTPUT: RETVAL
 bool
 cell_visible (player *pl, int dx, int dy)
 	CODE:
         RETVAL = FABS (dx) <= pl->ns->mapx / 2 && FABS (dy) <= pl->ns->mapy / 2
                  && !pl->blocked_los [dx + pl->ns->mapx / 2][dy + pl->ns->mapy / 2];
 INCLUDE: $PERL genacc partylist ../include/player.h |
 MODULE = cf        PACKAGE = cf::region
-region *first ()
+void
-	PROTOTYPE:
+list ()
-        CODE:
+	PPCODE:
-        RETVAL = first_region;
+        for_all_regions (rgn)
-        OUTPUT: RETVAL
+          XPUSHs (sv_2mortal (to_sv (rgn)));
 region *find (char *name)
 	PROTOTYPE: $
         CODE:
         RETVAL = region::find (name);
         OUTPUT: RETVAL
+region *find_fuzzy (char *name)
+	PROTOTYPE: $
+        CODE:
+        RETVAL = region::find_fuzzy (name);
+        OUTPUT: RETVAL
 INCLUDE: $PERL genacc region ../include/map.h |
 MODULE = cf        PACKAGE = cf::living
 INCLUDE: $PERL genacc living ../include/living.h |

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