Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse code

When removing PLAYERs from an ARENA, also remove the TURN if it no lo…

…nger has any PLAYERs.
  • Loading branch information...
commit 2246cdd5dc9dcdf972a4d96da8ab65dd5b2bfc78 1 parent 35ff540
Samuel Edwin Ward authored December 26, 2011

Showing 1 changed file with 4 additions and 1 deletion. Show diff stats Hide diff stats

  1. 5  arena.lisp
5  arena.lisp
@@ -59,4 +59,7 @@
59 59
 
60 60
 (defmethod delete-player ((arena arena) (player player))
61 61
   (setf (players arena)
62  
-	(remove player (players arena))))
  62
+	(remove player (players arena)))
  63
+  (when (null (players arena))
  64
+    (setf (turn arena)
  65
+	  nil)))

0 notes on commit 2246cdd

Please sign in to comment.
Something went wrong with that request. Please try again.