]> code.delx.au - gnu-emacs-elpa/commitdiff
Added chess-game-side-to-move back.
authorJohn Wiegley <johnw@newartisans.com>
Sat, 2 Mar 2002 05:45:35 +0000 (05:45 +0000)
committerJohn Wiegley <johnw@newartisans.com>
Sat, 2 Mar 2002 05:45:35 +0000 (05:45 +0000)
chess-game.el

index 177e163ab24696d45bc307b9ad2862791d098370..98ecc97a7b46428de82295911704d7c250ca1c4d 100644 (file)
@@ -64,6 +64,9 @@
   "Return the current GAME sequence."
   (1+ (/ (chess-game-index game) 2)))
 
+(defsubst chess-game-side-to-move (game)
+  (chess-pos-side-to-move (chess-game-pos game)))
+
 (defun chess-game-ply (game &optional index)
   "Return the position related to GAME's INDEX position."
   (if index